Bonjour,
J'avoue, je n'ai pas bien suivi ce webinaire, j'étais en vacances (cela m'arrive de temps en temps) en tout cas mon cerveau l'était c'est sûr
La question arrive un peu tard mais semble faire partie de ce chapitre.
Contexte : j'ai plusieurs formes que j'enchaine
j'utilise pour cela une des techniques proposées
1 2 3 4 5 6 7 8 9 10 11 12
| procedure TFormMain.EmbeddedForm(AParent: TControl; AForm: TCustomForm);
var AControl : TFMXObject;
begin
if Assigned(CurrentForm) then CurrentForm.Free;
// while AForm.ChildrenCount>0 do
AForm.Children[0].Parent:=AParent;
CurrentForm:=AForm;
if Assigned(AForm.ActiveControl) then
for AControl in AParent.Controls[0].Children do
if Sametext(AControl.Name,AForm.ActiveControl.Name)
then TControl(AControl).SetFocus;
end; |
, ma forme principale contient un style, les autres, à l'exécution, utilisent donc le style de celle-ci.
Problème, au design ce style "principal" n'est pas appliqué évidemment
pour l'instant je copie donc le style de ma forme principale sur chacune de mes formes "enfants" pour avoir le même rendu, inconvénients
- je dois indiquer la propriété StyleBook à la forme enfant
- une fois le design de la forme "enfant" terminée je ne dois pas oublier de supprimer cette copie de style
Questions : Un des outils que tu as présenté m'éviterait-il cette démarche ? Dans le même ordre d'idée un outil pourrait-il afficher une forme en fonction d'un style à choisir (dans une boite de choix) ?
J'avoue j'ai décroché quand tu as présenté LivePreview
0 |
0 |