Registriert seit: 2. Jun 2008
Ort: Köln
43 Beiträge
Delphi XE Architect
|
AW: Zugriffsverletzung bei umgebogen Parent des Fensters
25. Mär 2011, 20:46
Danke Euch, das war es!
Delphi-Quellcode:
procedure TForm14.Btn1Click(Sender: TObject);
begin
frm_Test:= Tfrm_Test.Create(self);
frm_Test.Parent:= sheet1;
sheet1.Glyph.Assign(frm_Test.Icon);
sheet1.Caption:=frm_Test.Caption;
frm_Test.Height:=sheet1.Height;
frm_Test.Width:= sheet1.Width;
frm_Test.Show;
SetLength(pagesArry, pgcMain.PageCount);
pagesArry[0]:=frm_Test.Handle;
pgcMain.ActivePageIndex:=0;
end;
Delphi-Quellcode:
procedure Tfrm_Test.btnStartClick(Sender: TObject);
begin
frmdbselect:= Tfrmdbselect.Create(frm_Test);
frmdbselect.Visible:=True;
frmdbselect.nxflpnl1.Caption:= 'Select';
frmdbselect.Parent:= sheetGetParams;
frmdbselect.Left:=0;
frmdbselect.Top:=200;
frmdbselect.Show;
end;
|
|
Zitat
|