Timer stoppen

[gmc616]

Vielleicht so?

Timerprozedur:

Delphi-Quellcode:

procedure TMainGUI.tmrAblaufTimer(Sender: TObject);
begin
  if MeinGereat <> nil then
  begin
    MeinGeraet.HoleDies;
    Application.ProcessMessages; 
    MeinGeraet.HoleJenes;
    Application.ProcessMessages;
    MeinGeraet.HoleDas;
  end
end;

Timer soll beendet werden:

Delphi-Quellcode:

begin
  meinTimer.enabled:=false; 
//  MeinGeraet.Free;
  FreeAndNil (MeinGeraet);
end;