![]() |
Re: Zugriffsverletzung beim Programm beenden
@mkienzler: Weil die Accessviolation beim Schließen auftritt :-)
|
Re: Zugriffsverletzung beim Programm beenden
Japs die AV trat beim beenden des Programmes auf.
Der Button wurde aber am Anfang nicht richtig angezeigt. Aber ich habe jetzt 2 Lösungen des Problems. die erste wurde sehr schön von onlinekater vorgegeben. Anstatt Show(); ein visible:= True; machen. Die 2te Lösung ist es in dem Projekt Code die Formen vor der Hauptform zu erzeugen
Delphi-Quellcode:
Dann muss noch noch ein kurzes refresh in der Main form eingefügt werden
Application.Initialize;
frmMemo:= TfrmMemo.Create(nil); // <-- Lösung 2 frmTabSheet:= TfrmTabSheet.Create(nil); // <-- Lösung 2 Application.CreateForm(TfrmMain, frmMain); //Application.CreateForm(TfrmMemo, frmMemo); //<-- Lösung 1 (normal) //Application.CreateForm(TfrmTabSheet, frmTabSheet); //<-- Lösung 1 (normal) Application.Run;
Delphi-Quellcode:
Und dann klappert es... ohne AV falschen Button oder sonstigen Problemen!
procedure TfrmMain.FormActivate(Sender: TObject);
begin frmMemo.Show(); frmMemo.Parent:= pnlMemoCon; frmMemo.BorderStyle:= bsNone; frmMemo.BorderIcons:= []; frmMemo.Align:= alClient; //frmMemo.Visible := True; <-- Lösung 1 frmTabSheet.Show(); frmTabSheet.Parent:= pnlTabSheets; frmTabSheet.BorderStyle:= bsNone; frmTabSheet.BorderIcons:= []; frmTabSheet.Align:= alClient; // frmTabSheet.Visible := True; <-- Lösung 1 refresh; //<-- Lösung 2 end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:40 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz