Discussion :

[krokmitaine]

Salut,
Je dispose d'un panel container paContainer, et de deux autres panels (paLeft & paRight) de même taille (donc de taille paContainer.Height / 2) inclus dans celui-ci. Comment faire pour que lors du redimensionnement de mon appli (et donc de paContainer), paLeft et paRight soient redimensionnés de façon à ce qu'ils aient toujours tous les deux la même taille qui est égale je le rappelle à la moitié de celle de paContainer ? (j'espère que j'ai été assez clair ... )
Merci !!!

[der§en]

En fait tu devrais avoir tes 2 sous-panels avec des alignements différents, je m'explique, paLeft avec Align := alLeft et paRight avec Align := alClient.

Puis pour toujours les avoir a la même taille, tu définis l'évènement OnResize du paContainer en y mettant un truc du genre:

paClient.Widht := paContainer.Width div 2;

Et du coup paClient sera lui aussi automatiquement a la bonne taille.

Der§en.

[Jipété]

donc de taille paContainer.Height / 2

paContainer.Width / 2 tu veux dire !
Et donc

Code :

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

1
2
3
4
 
panelgauche.Width := panelContainer.Width / 2;
paneldroit.Left   := panelgauche.Width; // peut-être avec "+ 1", pas testé.
paneldroit.Align  := alClient;

Rien testé mais c'est qqchse comme ça !
--
jp

[der§en]

Oui c'est le paContainer.Width qu'il fallait comprendre, désolé.

Par contre la ligne suivante est totalement inutilse si tu suis ce que je t'ai dis sur les alignement de tes 2 sous-panels:
paneldroit.Left := panelgauche.Width;

Der§en.

[krokmitaine]

Ah oui ! suis-je sot ! Je peux pas tester pour l'instant (le travail c'est fini pour aujourd'hui !!!) mais je le ferais demain. Idem pour la balise [résolu] (il ne faut pas vendre la peau de l'ours etc...).
Merci

[krokmitaine]

Galère ! Voici ce que je me reçois :

Code :

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

1
2
3
4
5
 
paFilterTravels.Width := paFilters.Width / 2;
 
[Pascal Error] Unit1.pas(58): E2010 Incompatible types: 'Integer' and 'Extended'
[Pascal Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

C'est quoi un 'Extended' ???

[krokmitaine]

J'ai trouvé. Il suffisait de convertir l'entier reçu en Extended et totu roule :

Code :

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

1
2
 
paLeft.Width := Round(paContainer.Witdh / 2);

Ci@o tutti !