Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Prism
by mbamler,
16. Aug 2006
ich meine natürlich :
procedure TWinForm.Timer1_Tick(sender: System.Object; e: System.EventArgs);
begin
MyForm := TwinForm1.Create;
MyForm.ShowDialog;
MyForm.BringToFront;
MyForm.Timer1.Enabled := false; //auch den Timer der neu erzeugten Form deaktivieren ...
Timer1.Enabled := false;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Prism
by mbamler,
16. Aug 2006
...Ohne das jetzt im Detail geprüft zu haben, fällt mir auf die Schnelle ein:
procedure TWinForm.Timer1_Tick(sender: System.Object; e: System.EventArgs);
begin
MyForm := TwinForm1.Create;
MyForm.ShowDialog;
MyForm.BringToFront;
MyForm.Enabled := false; //auch den Timer der neu erzeugten Form deaktivieren ...
Timer1.Enabled := false;
end;