Slt à tous, voilà mon premier souhait est de créer un TTabSheet dans un
TPageControl (jusque là rien de mal, tout va bien, la suite ne va plu
...).
Mon deuxième souhait est (évidemment) de ne pas créer un TTabSheet
vide
de ce fait pour tester, j'ai pris un composant tout simple (TLabel). Et
c'est la que le bas blesse car j'essaie de créer un objet sur un autre
objet qui n'existe pas (encore) Voyez pluto ...
procedure TForm1.FormCreate(Sender: TObject);
begin
with TTabSheet.Create(PageControl1) do begin
PageControl:=Pagecontrol1;
Name:='Tab1';
caption:='Tab1 cap';
with TLabel.Create(Tab1) do begin
Parent:=Tab1;
Top:=8; Left:=8;
Caption:='Label cap'
end;
end;
end;
L'erreur de compilation qui s'affiche n'est autre que :
[Erreur] Unit1.pas(41): Identificateur non déclaré : 'Tab1'
J'ai également fait le test en remplacant dans la
création du TLabel "Tab1" par "Self"
et là pas de soucis

. Mais comme mon but n'étant pas de créer un label sur la Form mais dans un tab

...
Qqn aurait-il une ou des suggestions ?
Alexis