Einzelnen Beitrag anzeigen

Benutzerbild von Nikolas
Nikolas

Registriert seit: 28. Jul 2003
1.528 Beiträge
 
Delphi 2005 Personal
 
#5

Re: Timereigenschaften in selbsterstellter procedure ändern

  Alt 29. Mai 2004, 19:37
Das mit Form1.Timer1. ist sicher nicht die Beste Lösung aus den o.g. Gründen. Übergib lieber den gewünschten Timer als Parameter und bearbeite ihn dann.
Delphi-Quellcode:
TKuken = class(TImageSprite)
  Public
    Constructor Create(aparent:Tsprite); override;
    Procedure right(timer: Ttimer);
  end;
.
.
procedure TKuken.rigth(timer: Ttimer);
begin
timer.enabled:=true;
end;
.
.
//aufrufen:
VarTKuken.right(Form1.Timer1);
Erwarte das Beste und bereite dich auf das Schlimmste vor.
  Mit Zitat antworten Zitat