![]() | ![]() Products ![]() ![]() ![]() ![]() |
Home » Technical Support » Elevate Web Builder Technical Support » Product Manuals » Elevate Web Builder 3 Manual » Using Visual Controls » Creating and Showing Forms |
project MusicCollection; contains Main, Album, AddAlbum, Track, SetMediaID; uses WebForms, WebCtrls; begin Application.CreateForm(TMainForm); Application.Run('MainForm'); end.
uses EditFolder; procedure TMainForm.LaunchButtonClick(Sender: TObject); begin EditFolderDlg:=TEditFolderDlg.Create(nil); EditFolderDlg.ShowModal; end;
uses ProgFrm; procedure TMainForm.LaunchButtonClick(Sender: TObject); begin ProgressForm:=TProgressForm.Create(nil); try ProgressForm.ShowModal; finally ProgressForm.Free; end; end;
uses ProgFrm; procedure TMainForm.ProgressFormClose(Sender: TObject); begin ProgressForm.Free; end; procedure TMainForm.LaunchButtonClick(Sender: TObject); begin ProgressForm:=TProgressForm.Create(nil); ProgressForm.OnClose:=ProgressFormClose; ProgressForm.ShowModal; end;
This web page was last updated on Friday, January 31, 2025 at 08:42 AM | Privacy Policy![]() © 2025 Elevate Software, Inc. All Rights Reserved Questions or comments ? ![]() |