une unit ???
tu parles d'une form j'imagine... (une unit, tu as juste a en faire un uses pour pouvoir l'utiliser)
dans ton nouveau projet, tu as une TForm1 par defaut, ajoute une nouvelle form (TForm2, par defaut) et pose un bouton (Button1 par defaut). sur le Click du Button1, mets ce code:
Code :
- procedure TForm1.Button1Click(Sender: TObject);
- begin
- //créer une nouvelle form
- with TForm2.create(self) do
- try
- // la montrer
- ShowModal;
- finally
- //la libérer
- Free;
- end;
- end;
|
[edit]--Message édité par JWhy--[/edit]
---------------
www.alliancefrancophone.org ... Home is where the heart is