Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Beliebig viele bzw enig formulare zur laufzeit erstellen.... (https://www.delphipraxis.net/31838-beliebig-viele-bzw-enig-formulare-zur-laufzeit-erstellen.html)

pmc 14. Okt 2004 17:18


Beliebig viele bzw enig formulare zur laufzeit erstellen....
 
Hallöchen miteinander,

Ich bin grade dabei mein eigenen irc zu schreiben so funzt alles nur möchte ich jetzt für jeden query nen eigenes win weiss nur nicht wie ich das machen soll

kann mir vllt jemand nen bissel quelltext geben .. hab schon im forum gesucht aber nur was mit arrays gefunden...möchte aber dynamisch bleiben deswegen kein array benutzen oder geht es nur mit arrays???!!!

bis dann
PMC

Zacherl 14. Okt 2004 17:22

Re: Beliebig viele bzw enig formulare zur laufzeit erstellen
 
Ich hätte es so gemacht:

Delphi-Quellcode:
var
  Form1: TForm1; formnr: integer; form: tform;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
form := tform.create(nil);
form.name := 'Form'+inttostr(formnr);
formnr := formnr+1;
form.show;
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:18 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz