Forum: Object-Pascal / Delphi-Language
Delphi
by Crazy-MF,
17. Feb 2005
ihr (>du) seit/bist meine helden
ich danke
Forum: Object-Pascal / Delphi-Language
Delphi
by Crazy-MF,
17. Feb 2005
okay okay. jetz funzt es.
ich habe meine oberfläche mit dem editfeld und 2 button
ich gebe meinen intervall an und drücke button1 und er läuft los. sendet brav über lpt1 die daten und nach jedem datenabschnitt unterbricht er für zeit x. aber endlos läuft er nicht. er bleibt nach 30 stehen und fängt nicht wieder von 0 an. wenn ich das aber alles in eine schleife setze und diese auf unedlich...
Forum: Object-Pascal / Delphi-Language
Delphi
by Crazy-MF,
17. Feb 2005
Ja danke, das klappt soweit. Aber ich muss die Werte in Hex an den Port senden und er zählt jetzt dezimal hoch.
WAS TUN?
bis Port($378,09) kommt er ja aber dann müsste er ja anders senden?
Forum: Object-Pascal / Delphi-Language
Delphi
by Crazy-MF,
16. Feb 2005
Ja stimmt. sorry.
also mein quelltext sieht ungefähr so aus:
procedure PortOut(Port : Word; Data : Byte); stdcall; external 'io.dll';
function PortIn(Port : Word): Byte; stdcall; external 'io.dll';
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by Crazy-MF,
16. Feb 2005
Tja das Problem bei der Sache ist dann nur noch:
Die Schleife wird bei dem Startbutton gestartet und nach dem der erste Hexwert gesendet ist soll er eine Pause einlegen, die ich im Editfeld eintrage, dann erst soll der nächste wert gesendet werden.
und der stoppbutton soll nur vorsorglich und zum ändern des taktes sein.
kann sein das ich das falsch erklärt habe.
danke aber für deinen tipp
Forum: Object-Pascal / Delphi-Language
Delphi
by Crazy-MF,
16. Feb 2005
Hallöchen,
war zwar lange nicht mehr da, hoffe aber das man mir trotzdem hilft.
Und zwar sende ich gerade über die TrackBar über den LPT1 an ein Gerät die Zahlen 1-30 im Hexadezimalen Zahlensystem.
Weil ich aber nicht den ganzen Tag vor meinem Notebook sitzen möchte um die TrackBar im Sekundentakt weiter zu schieben würde ich das gerne in einer Endlosschleife realisieren und dabei den...