Code immer wieder ausführen

[Nalincah]

Dann schreib doch einfach in den Timer "Button1.Click" oder so ähnlich. Je nach Komponente wo der source drin ist

[neolithos]

Delphi-Quellcode:

TMyCompo = class (TComponent)
private
  fTimer : TTimer;
  procedure TimerTimer(Sender : TObject);

constructor TMyCombo.Create(???);
begin
  inherited ???
  ....
  fTimer := TTimer.Create(Self);
  fTimer.Interval := 1000;
  fTimer.OnTimer = TimerTimer;
end;

procedure TMyCombo.TimerTimer(Sender : TObject);
begin
  ...
end;

So einfach kann es sein

[neolithos]

Verwendest du ein TWinControl-Kind dann kann man es noch besser machen!

[Uncle Cracker]

Danke neolithos für den Code, doch so hatte ich es auch schon mal, jedoch funktioniert das nicht, also der lädet den Code nicht immer wieder.

Deshalb habe ich die Funktionen in eine Dll Ausgelagert und lade die Dll, das geht auch.

[Phoenix]

Du musst den Time dann freilich noch auf enabled := true setzen. Und im Destroy der Komponente natürlich auch wieder zerstören.