Einzelnen Beitrag anzeigen

Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#1

Code wird ausgeführt, obwohl das nicht sein sollte

  Alt 18. Dez 2004, 11:49
Hi,


ich hab grad nen komischen Problem .


Also, ich hab eine MDI-Form (Main), ein Child (Doc) und die Optionen Form (Option).


In der Main hab ich den Code:

Delphi-Quellcode:
procedure Tfmain.tbOptionenClick(Sender: TObject);
begin
  fOption.ShowModal;
end;
Option:
Delphi-Quellcode:
procedure TfOption.FormShow(Sender: TObject);
begin
  LoadOption;
end;

procedure TfOption.LoadOption;
begin
  Storage.RestoreFormPlacement;
  Optionen.NewDocAtStart := cbNewDocAtStart.Checked;
  if gbEditor.ItemIndex = 0 then
    Optionen.Editor := etRichText
  else
    Optionen.Editor := etCode;
  Optionen.Font.Name := cbSchriften.Text;
  Optionen.Font.Size := seSize.Value;
end;
Soweit alles klar.

Jetzt wird aber noch der Code ausgeführt:

Delphi-Quellcode:
procedure Tfmain.tbNeuClick(Sender: TObject);
begin
  Application.CreateForm(TfDoc, fDoc);
end;
Daraufhin bekomm ich eine Zugriffsverletzung, weil er auf Optionen.Font zugreifen will, aber zu diesem Zeitpunkt noch nicht definiert ist. Das komische ist nun, ich klicke auf den Button um die Optionen zu öffnen, aber der Code um ein MDIChild zu erstellen wird auch ausgeführt. Liegts vielleicht an der TFormStorage der RxLib?
  Mit Zitat antworten Zitat