Bonjour,
j'essaye d'écrire une procédure pour centrer dynamiquement mes composants en cas de resize, un truc du genre :
et la même pour aligneH...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 procedure AligneV(pere ;fils:TObject); begin (fils as TComponent).top:= ((pere as tcomponent).height-(fils as TComponent).height) mod 2; end;
note : le père peut être une form, un panel ou autre chose et le fils un label, une grille, un edit ...
et forcément ça marche pas sinon je ne serais pas a vous expliquer mon problème.
le must serait de tout mettre les familles dans une table SQL par leur nom (peres,fils,alignement) mais je ne crois pas cela possible.
merci déjà de me lire et de vos réponses avisées s'il y en a.
Partager