Warten-Befehl

[flobus]

Moin, :hello:
ich hab ein Programm zum ausgeben von Daten über den Parallelport geschrieben und wollte nun noch einen "warten-Befehl" bevor die Daten gesendet werden einfügen.
Hab ich auch schon mit sleep(100) ausprobiert, aber beim Compilieren sagt der pc immer Unbekannter Bezeichner.

:arrow: Hier der Quellcode:

Delphi-Quellcode:

procedure TForm1.RadioButton1Click(Sender: TObject);
begin
sleep(100)
port[888] :=1
end;

Ich weis noch nicht so viel über Delphi. :wall:
Kann mir bitte jemand sagen was falsch ist.
Oder gibt es noch eine andere Methode um das Programm für eine besimmte Zeit aufzuhalten?
Bitte helft mir.

mfg Florian B.

[jfheins]

Nach (fast) jeder Anweisung muss ein Semikolon kommen :!:

Aber sleep müsste eigentlich bekannt sein.

[DGL-luke]

ja, die sleep-methode hält alles an. allerdings brauchst du dann noch ein ';' nach dem sleep.

sie hält aber dann alles an: deine anwendung reagiert nicht mehr.

besser ist es, einen TTimer zu nehmen.

bei dem im ontimer das port[888]:= reinschreiben und noch dazu ein timer1.enabled:=false;

und dann, wenn du in den port schreiben willst, die anzahl an millisekunden die du warten willst ins timer1.interval und timer1.enabled:=true setzen.

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender:TObject);
begin
port[888]:=1;
timer1.enabled:=false;
end;

procedure portout;
begin
timer1.interval:=100;
timer1.enabled:=true;
end;

[jfheins]

Oder gleich Delay ;)

[flobus]

Danke erst mal für eure Bemühungen! :thumb:

mit sleep(100);
hab ich auch wieder den gleichen Fehler.

Bei delay gibt der pc auch den gleichen Fehler aus.

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender:TObject);  //hier wieder unbekannter Bezeichner
begin
port[888]:=1;
timer1.enabled:=false;
end;

procedure portout;
begin
timer1.interval:=100;
timer1.enabled:=true;
end;

Der "Warten-Befehl" muss ausgeführt werden, wenn ich einen RadioButton aktiviere.
Geht das?

Ich bin ers 13 Jahre alt und hab Delphi aus dem Buch Turbo Pascal und Delphi programmieren, wie die Profis. Weis einer was in dem Buch für eine Version enthalten ist? (Screenshot im anhang)
Es könnte ja auch an der Version scheitern. Ich hab da keine Ahnung!
Im Bereich von Delphi Info steht nur "Borland Delphi Copyright (C) 1983-95".

Bitte helft mir. :wall:

[edit=Sharky]Delphi-Tags korrigiert. Mfg, Sharky[/edit]

[alzaimar]

Die Prozedur Sleep wird von der Unit Windows exportiert. Du musst also irgendwo in deinem Programm diese Unit importieren:

Delphi-Quellcode:

...
Uses ... Windows, ....;
...

Wenn Du eine Unit schreibst, dann gibt es zwei Möglichkeiten:
- Im interface-Teil
- Im implementation-Teil

[flobus]

Wo soll ich die einsetzen?
:wiejetzt:
Ich hab die mal so eingesetzt:

Delphi-Quellcode:

uses
  SysUtils, Wintype, .... , Windows;

Sagt dann aber, dass die Windows.DCU nicht gefunden werden konnte.
Muss ich die extra importieren oder so?

:gruebel:

[mirage228]

Zitat:

Zitat von flobus

Wo soll ich die einsetzen?
:wiejetzt:
Ich hab die mal so eingesetzt:

Delphi-Quellcode:

uses
  SysUtils, Wintype, .... , Windows;

Sagt dann aber, dass die Windows.DCU nicht gefunden werden konnte.
Muss ich die extra importieren oder so?

:gruebel:

Hi,

auf Deinem Screenshot sieht das nach Delphi 1 aus.
Da war die Unit Windows noch in "WinTypes" und "WinProcs" aufgeteilt.
Die letztere musst Du also noch einbinden.

mfG
mirage228

[Garfield]

In mehreren Online-Buchhandlungen habe ich nur "Turbo Pascal und Delphi für Kids" von Hans-Georg Schumann gefunden. Darin ist eine CD mit den Vollversionen von Turbo Pascal 7 für DOS und Delphi 1 enthalten.
http://fachbuecher.libri.de/shop/act...artiId=1441749

[flobus]

Hi,

Zitat:

von: mirage228
Hi,

auf Deinem Screenshot sieht das nach Delphi 1 aus.
Da war die Unit Windows noch in "WinTypes" und "WinProcs" aufgeteilt.
Die letztere musst Du also noch einbinden.

"WinTypes" und "WinProcs" sind schon eingebunden.

Delphi-Quellcode:

uses
  SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
  Forms, Dialogs, StdCtrls, VBXCtrl, Switch;

was nun? :gruebel:

mfg Florian B. :coder:

[mirage228]

Hm, dann weiss ich es auch nicht. Habe leider auch kein Delphi 1 zur Hand, um es testen zu können.

Du könntest aber versuchen sleep selbst zu importieren aus der entsprecehenden Windows dll :gruebel:

mfG
mirage228

[flobus]

hi, :bouncing4:
von dlls versteh ich nichts :gruebel: , bin erst 13 Jahre alt.
Trotzdem danke an alle für eure Bemühungen.
Ich hol mir erst mal Borland Delphi 2005.

mfg Florian B.

[alcaeus]

Zitat:

Zitat von flobus

Ich hol mir erst mal Borland Delphi 2005.

:gruebel: ein 13jaehriger der sich "erst mal einfach so" D2k5 holt. Davon wirst du auch nicht programmieren Lernen. Mein Tipp, such dir Delphi for Kids, da war normalerweise eine D3 Professional dabei. Damit kannst du schon einiges mehr als mit Delphi 1. Arbeite das Buch Schritt fuer Schritt durch bevor du zu solchen Projekten gehst.

Greetz
alcaeus

[flobus]

Moin,
Das Buch hab ich schon gelesen, hasst aber recht.
Ich hab mal nach den Preisen geschaut. Über 1.000€ ist auch nen bischen teuer für mich. :cry:
Überleg ich mir noch mal! :corky:

:dance: Danke an alle!!! :dance:
Die Fragen sind alle beantwortet worden. DANKE :coder2:

mfg Florian B.