Ungültige Zeigeroperation

[Moony]

Hi, zusammen,

ich habe ein Progrämmchen bei dem ich mit einer Hauptform arbeite und innerhalb der Laufzeit wenn benötigt unterschiedliche Frames dynamisch der Hauptform mit

Frame.Parent := fmMain;

zuweise.In den bisherigen Routinen funktioniert das, aber jetzt bei einer neuen Operation funktioniert das Zuweisen eines Frames nicht mehr, obwohl die gleichen Reset-Operationen durchgeführt werden:

Self.Parent := nil;
...

Beim Klick auf ein Image auf der Hauptform wird dann das Startframe zugewiesen:

Frame.Parent := fmMain;
Frame.Left := 0;
Frame.Top := 0;

Beim Zuweisen von fmMain gibt es folgende Fehlermeldung:
Im Projekt ist eine Exception der Klasse EInvalidPointer mit der Meldung 'Ungültige Zeigeroperation' aufgetreten.

Ich habe keine Ahnung warum diese Exception auftritt. Hoffe auf eure schnelle Hilfe....


Danke & Gruß, Moony

[stahli]

Hast Du das Frame vielleicht irgendwo freigegeben?
Setze mal einen Haltepunkt und schau Dir das Frame mal genauer an...

[Moony]

Nee, die Frames werden in der Ondestroy Routine freigegeben. Ich habe einen Haltepunkt gemacht und Assigned(Frame) war nicht nil.

[Bummi]

Zitat:

Assigned(Frame)

nicht daß der Fehler von dort kommen müsste, aber ein Assigned heißt nicht dass das Objekt noch da sein muss ...

[Moony]

Ok, aber warum funktioniert es an anderer Stelle mit anderen Frames im Projekt? Wie kann ich dann feststellen, dass ein Frame nicht freigegeben wurde?

[ibp]

Zitat von Bummi:

Zitat:

Assigned(Frame)

nicht daß der Fehler von dort kommen müsste, aber ein Assigned heißt nicht dass das Objekt noch da sein muss ...

Code:

Assigned(Frame)

bedeutet nur, dass Frame <> Nil ist wenn der Ausdruck True ist!

Wie gibst du denn das Frame frei? Mit Free? Wenn ja dann versuch doch mal mit

Code:

FreeAndNil(Frame)

[DeddyH]

Genau, entweder mit FreeAndNil oder nach dem Free Objekt selbst auf nil setzen.

[Moony]

Ok, das kann ich auch versuchen. Aber der Punkt ist, dass zu diesem Zeitpunkt das Frame nicht freigegeben werden soll und somit auch die Routine nicht aufgerufen wird. Wenn ich das Parent vom Frame = nil setze und anschließend einem anderem Frame meine Hauptform als Parent zuweisen will, dann bekomme ich die Zeigerexception.

[DeddyH]

Zitat:

Beim Klick auf ein Image auf der Hauptform wird dann das Startframe zugewiesen:

Frame.Parent := fmMain;

Nur eine Idee:

Delphi-Quellcode:

procedure TfmMain.DeinImageClick(Sender: TObject);
begin
  if Sender is TImage then
    Frame.Parent := TImage(Sender).Parent;

[Moony]

Theoretisch ginge das, aber praktisch nicht, da nicht der Sender als Parent zugewiesen werden muss, sondern die Hauptform.