[Lazarus] Newbie
Howard Page-Clark
hdpc at talktalk.net
Sat Mar 5 19:21:20 CET 2011
On 05/3/11 6:02, Milan Baša wrote:
> stringgrid1.Cells[1,1]:=inttostr(i);
> edit1.Text:=inttostr(i);
> sleep(1000);
> end;
> Progressbar is working, statictext is increasing numbers but every other
> components are frozen til the time program stops and at this moment i
> can see everywhwere number 10.
> I see no progress, only result 10.
Add Application.ProcessMessages; e. g. like this
...
edit1.Text:=inttostr(i);
Application.ProcessMessages;
sleep(1000);
...
Howard
More information about the Lazarus
mailing list