Discussion :

[Conficius]

Bonjour encore alors voilà, j'ai une BomboBox et j'ai des menus dedans :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
mètre
mètre carré

Voilà et moi je voudrais que, quand on clique sur mètre, il y ait la form2 qui s'ouvre; j'espère que vous pouvez me le dire. Merci

[rvzip64]

Il faut mettre ton code dans l'évenement "OnChange" de la combobox.

Aprés il te suffit de te servir de la propriété "Text" ou "itemindex" pour savoir quel élément à été sélectionner.

[crash override]

Je suppose que c'est en mid que tu veux faire ça.
Alors va sur la combobox, sur la propriété et sur items, clique dessus, mets ton texte.
Après, va sur evénements et va sur onchange, clique dessus et mets le code là

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if Combobox1.Text='mètre' then
begin
Form2:=TForm2.Create(application)
end;
end;

[Conficius]

Super, c'est bon ça marche ! Merrci mais j'ai un peu modifié le code car c'était ça qu'il me fallait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.ComboBox1Change(Sender: TObject);
 
begin
if Combobox1.Text='mètre' then
begin
Form2 := TForm2.Create(Self);
Form2.ParentWindow := Self.Handle;
Form2.WindowState := wsMaximized;
Form2.Show;
 
end;
end;

Enfin depuis très lontemps quelqu'un qui m'a aidé. Merci !!