[lazarus] Get button state

[Sebastian Kraft]

> You have to give the LCL event queue some processing time.
>
> procedure TTestwin.startClicked(Sender: TObject);
> begin
>   ButtonStopPressed:=false;
>   repeat
>     writeln('xxx');
>     Application.ProcessMessages;
>   until ButtonStopPressed;
> end;
>
> procedure TTestwin.stopClicked(Sender: TObject);
> begin
>   ButtonStopPressed:=true;
> end;
>
Great thanks!!
That solved it...

But I still have another problem as you can see in the other post ;-)
Documentation is not very helpful yet....

Sebastian