Label.text im MainFrame aus frame setzen

[tkhandel]

Hallo,
ich habe zwar verschiedenen Beiträge gefunden bezüglich Frames, bin aber nicht schlau daraus
geworden und alle Beispiele haben irgendwie nicht funktioniert.

Eine mainForm ruft ein Frame dynamisch auf das wiederum bei einem Buttoncklick ein anderes Frame dynamich
aufruft das dann in dem MainPanel des aufrufenden Frames angezeigt wird;

procedure TfraTour.btnTourWBClick(Sender: TObject);
var
fraTourLaden_WB1 : TfraTourLadenWB;
begin
fraTourLaden_WB1 := TfraTourLadenWB.Create(self);
fraTourLaden_WB1.Parent := self.pnlMain; // panel des Frame
fraTourLaden_WB1.vAufrufVon := 'Tagestour';
end;


in dem aufgerufenen Frame wird ein datum gewählt und

procedure TfraTourLadenWB.btnWeiterClick(Sender: TObject);
var
fraTour1 : TfraTour;
begin
dm.vWiederbesuch := TMSFNCCalendar1.Date;
dm.vWBString := ( jb_unit.getTag(dm.vWiederbesuch) + DateToStr(TMSFNCCalendar1.Date) );
dm.EinstSaveIni('TagesTour', 'WB', dm.vWBString);

if vAufrufVon = 'Tagestour' then
begin
fraTour1.btnTourWB.Text := dm.vWBString;
end;
...

self.Free;
self := nil;
end;


Fehler Im Projekt TKHKasse.exe ist eine Exception der Klasse $C0000005 mit der Meldung 'access violation at 0x019c42cb: read of address 0xd1e51268' aufgetreten.


Habe auch scon probiert es über procedure in der Mainfrom oder in dem Datenmodul zu lösen, leider ohne Erfolg

[Uwe Raabe]

Ich habe das mal formatiert:

Delphi-Quellcode:

procedure TfraTourLadenWB.btnWeiterClick(Sender: TObject);
var
  fraTour1 : TfraTour;
begin
  dm.vWiederbesuch := TMSFNCCalendar1.Date;
  dm.vWBString := ( jb_unit.getTag(dm.vWiederbesuch) + DateToStr(TMSFNCCalendar1.Date) );
  dm.EinstSaveIni('TagesTour', 'WB', dm.vWBString);

  if vAufrufVon = 'Tagestour' then
  begin
    fraTour1.btnTourWB.Text := dm.vWBString;
  end;
  ...

  self.Free;
  self := nil;
end;

Zum einen ist die lokale Variable fraTour1 an der Stelle offenbar nicht initialisiert und zum anderen sollte man eher selten Self.Free aufrufen und vermutlich niemals Self := nil setzen.

Mir ist auch noch nicht ganz klar, was du überhaupt erreichen willst.

[himitsu]

vielleicht Self.Release;
und ja, wenn durch irgendwas, nach deiner Methode, im übergeordneten Code auf die Form zugegriffen wird, dann knallt es natürlich, wenn die Form schon weg ist.

[Uwe Raabe]

Zitat von himitsu:

vielleicht Self.Release;
und ja, wenn durch irgendwas, nach deiner Methode, im übergeordneten Code auf die Form zugegriffen wird, dann knallt es natürlich, wenn die Form schon weg ist.

Anhand des Namens TfraTourLadenWB und der Bemerkung im Original

Zitat von tkhandel:

in dem aufgerufenen Frame wird ein datum gewählt und

gehe ich davon aus, dass es sich um einen Frame handelt. Da ist das Release eher nicht der richtige Ansatz.

[jaenicke]

Wenn auf einem Formular ein Frame liegt, der durch einen anderen ausgetauscht werden soll, sollte das auch im Formular passieren. Und wenn ein Frame auf einem Elternframe liegt, sollte sich der Elternframe darum kümmern.

Das bedeutet:
Wenn auf dem Frame eine Aktion ausgelöst wird, die dazu führt, dass der aktuelle Frame entfernt werden soll, sollte das per Event an das Formular oder den Elternframe mitgeteilt werden, damit dort die Aktion ausgeführt wird.

[tkhandel]

Hallo,

ja danke erstmal für die schnellen Antworten!! Aber ich bin damit leider auch nicht weitergekommen.
Kann es sein das es am laden der Frames zur Laufzeit (also dynamisch) oder gar an FMX liegt?

Ich versuche es mal ohne Code zu erklären, ist vielleicht einfacher:

Formular ruft Frame1 auf und Frame1.Parent ist die Form,

Aus Frame1 rufe ich Frame2 für eine Abfrage auf, Frame2 hat als Parent Frame1
Frame2 wieder schließen und das Ergebnis (ein String) auf einem Label in Frame 1 anzeigen.
(hört sich so einfach an, aber ich kriege es nicht hin)

Ich habe es mit einer Procedure im Formular versucht, mit einer Procedure in Frame1 oder über
eine Variable in Frame1 usw. knallt immer.

Das Problem ist ja das FMX nicht wartet sondern weiterarbeitet sonst könnte ich das Ergebnis einfach nach der Rückkehr
aus Frame2 aus einer variable lesen.

bräuchte also mal wieder eure Hilfe.

PS: Was ist falsch daran die Frames nach gebrauch mit Free und nil zu entsorgen?