![]() | Products |
| Home » Technical Support » Elevate Web Builder Technical Support » Product Manuals » Elevate Web Builder 3 Manual » Language Reference » Asynchronous Calls |
procedure TForm1.Button1Click(Sender: TObject); begin async CreatePanel(0); end;
procedure TForm1.CreatePanels;
var
I: Integer;
begin
for I:=1 to 100 do
TPanel.Create(Self);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowProgress('Creating panels...');
CreatePanels;
HideProgress;
end;procedure TForm1.CreatePanel(I: Integer);
begin
TPanel.Create(Self);
Inc(I);
if (I < 100) then
async CreatePanel(I)
else
async HideProgress;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowProgress('Creating panels...');
async CreatePanel(0);
end;This web page was last updated on Tuesday, September 16, 2025 at 04:56 PM | Privacy Policy © 2025 Elevate Software, Inc. All Rights Reserved Questions or comments ? |

