hallo
ich hab nen problem:
ich hab nen programm geschrieben das immer wieder die selbe aktion ausführen soll wenn man einen button drückt und damit aufhören soll wenn ich auf einen anderen drück. nur hab ich das problem das das programm hängt wenn ich den start button klick.
Delphi-Quellcode:
procedure TForm1.klicker;
begin
while onoff > 0 do
begin
//...//
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
onoff := 1;
klicker;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
onoff := 0;
end;
mfg vip11
p.s. hab sufu benutzt aber nichts gefunden
[edit=mkinzler]Code-Tag durch Delphi-Tag ersetzt Mfg, mkinzler[/edit]