Bonjour à tous,
J'ai une application écrite en Delphi 6.
Une seulle fenêtre, avec un onglet créé d'office, et un nombre variable d'onglets créés dynamiquement.
La hauteur des infos dans les onglets étant variable, j'ai mis les infos dans des TScrollBox, dont je positionne l'ascenseur en haut.
Jusque là tout va bien.
J'ai un cas d'utilisation pour lequel de réaffiche tout comme au premier lancement. L'ascenseur vertical de la fenêtre principale ne se met pas alors en haut, et les onglets sont masqués (juste eux).
Je n'arrive pas à forcer la position de l'ascenceurs vertical, bien que j'indique Form1.VertScrollBar.Position:=0.
Je suis loin d'être un spécialiste.
Avez-vous des pistes ?
Merci.
J'ai trouvé : le positionnement de l'ascenseur ne se faisait pas parce que le dernier objet à avoir eu le focus le gardait.
J'ai donc rajouté
Citation :
global.SetFocus;
|
avant
Citation :
Form1.VertScrollBar.Position:=0;
|
(global est TPageControl qui contient mes TTabSheet).
Et maintenant c'est nickel.
Didier.
Message édité par maitreyoda49 le 26-12-2008 à 21:34:54
