Bueno volví rápido, me entró una duda, por ejemplo, en este pedazo de código donde se crea el componente TImage bajo TPanel1:
Código Delphi
[-]constructor TPanel1.Create(aOwner: TComponent);
begin
inherited;
with TLabel.Create(aOwner) do
begin
Parent := Self;
Caption := ID;
Font.Name := 'Tahoma';
Font.Size := 8;
Font.Color := clBlack;
Top := 0;
end;
with TLabel.Create(aOwner) do
begin
Parent := Self;
Caption := AUTOR;
Top := 30;
end;
with TImage.Create(aOwner) do
begin
Parent := Self;
Align := alClient;
Picture.LoadFromFile(FOTO);
Stretch := True;
Onclick := Click;
end;
Width := 200;
Height := 200;
end;
¿El procedure lo creo fuera del constructor o dentro o entre begin...end del Timage?, disculpa mi ignorancia.
Saludos.