Avatar billede jisch Mester
02. maj 2020 - 11:59

Delphi Component

Delphi 2009. Jeg har skrevet kode til en komponent, der består af 2 TPanel kontroller (bemærk, at TPanel er en container), der "overlapper" hinanden.

Type
  TPan2 = Class(TPanel)
End;

type
  TPan1 = class(TPanel)
.
.
  public
    { Public declarations }
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
.
.
constructor TPan1.Create(AOwner: TComponent); { Efter implementation }
begin
  inherited  Create(AOwner); //Parent
  Pan2:=TPan2.Create(Self); //Child
  Pan2.Parent:=Self;  //Hvis dette undlades vises Pan2 IKKE !!
  Init;
end;

destructor TJSForm.Destroy;
begin
  Pan2.Free;
  inherited;
end;

Pan2 overlapper Pan1 (Pan2.Parent:=Self betyder vel at Pan1 "ejer" Pan2). Hvis jeg smider en komponent på Pan1 virker alt fint, men hvis jeg gør det på Pan2 - "forsvinder" (= vises ikke) den, når programmet køres!!!!!
Hvorfor?
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester