Login ProductsSalesSupportDownloadsAbout |
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 Thursday, November 16, 2023 at 10:39 AM | Privacy PolicySite Map © 2024 Elevate Software, Inc. All Rights Reserved Questions or comments ? E-mail us at info@elevatesoft.com |