Thema: Delphi Eigene Prozeduren...

Einzelnen Beitrag anzeigen

Benutzerbild von a51
a51

Registriert seit: 23. Jul 2003
Ort: 50.8NB-12.9ÖL!
7 Beiträge
 
#11

Re: Eigene Prozeduren...

  Alt 1. Jul 2004, 07:06
moin creek...

der unterschied zwischen tform1 und form1 ist, dass tform1 nur der bezeichner für eine klassendefinition ist (oder einfach eine klasse...).
form1 dagegen ist eine instanz von tform1, so wie zum beispiel bei...
var nstanz: integer; ... nstanz eine instanz von integer ist (statt instanz kannst du daher wohl auch variable sagen...).

zur nächsten frage:
erstens mal würde ich das eigentlich nicht mit einer sleep-funktion machen, sondern mit der klasse ttimer (steht als komponente normalerweise unter "system"). bei der komponente stellst du den intervall einfach ein ... du könntest damit die for-schleife ersetzten, indem du die laufvariable einfach global definierst, so z.B.:
Delphi-Quellcode:
var cnt: integer;

procedure timer.on_whatever; //sorry, ich kenn die genaue def nicht!
begin inc(cnt);
  //gfx-funktionen
  timer.enabled:= (cnt<=400); //400 waren es in meinem gfx-prog...
end;
wenn du aber unbeding sleep brauchst, dann müsstest du zweitens deine sleep-länge zwei- bzw. x-teilen und dann dazwischen
eine abbruchbedingung (z.B. ESC gedrückt oder ähnliches) einbauen:
anstatt z.B. ...
sleep(500); ... zu schreiben könntest du...
Delphi-Quellcode:
sleep(250);
if key=#27 then abbruch;
//es gibt natürlich weder 'key' noch 'abbruch' standardmäßig definiert!
sleep(250);
... schreiben. aber du könnstest natürlich auch einfach die obere Variante benutzen...

cya, folks...!
  Mit Zitat antworten Zitat