arra of [klasse] -> andere unit zugreifen;

[Mokus]

Delphi-Quellcode:

...
  public
    s_name: string;

  Type
    arrofad = array of TForm3;

....

Delphi-Quellcode:

procedure TForm3.Button1Click(Sender: TObject);
var
  arofad: arrofad;
begin
  setlength(arofad, 1);
  arofad[High(arofad)] := TForm3.create(self);
  arofad[0].s_name := e_name.Text;
  showmessage(arofad[0)].s_name);
  close;
end;

so, möchte nun auf das arrofad zugreifen von einer anderen Klasse & Unit drauf zugreifen.

Delphi-Quellcode:

procedure TForm4.Button1Click(Sender: TObject);
var
  book: TForm3;
  aroffad: TForm3.arrofad;
begin
  book := TForm3.Create(self);
  aroffad := book.arrofad[high(book.arrofad)].Create(self); // weiß das ich durchb das createn eine neue erstelle, war aber mit einer // meiner letzten versucche. weiß echt nicht mehr weiter :<

  Memo1.Text := aroffad[0].s_name;
end;

end.

gibt es hier eine einfache Möglichkeit ?

[Jumpy]

Kannst du vllt. mal genau beschreiben (in Worten) was du machen möchtest?

Von Form 4 auf 3 zugreifen, dabei in Form3 weitere Instanzen von Form3 erzeugen?

Das scheint mir irgendwie alles sehr konfus und ist bestimmt nicht der sinnvolle weg zu dem was du möchtest (behaupte ich jetzt mal, da ich ja nicht weiß bzw. nicht klar wird, was du möchtest).

[Mokus]

Hey Ralph,

du hattest recht. es ist nicht die sinnvollste Möglichkeit.
Hab das Problem nun anders gereglt ...
Aber ich wusste nur nicht wie ich das Topic schließen konnte <_<