Prozeduraufruf aus einem Formular ins andere funzt nicht

[ustra]

Hallo,

folgende Situation:

ich habe ein D5 Projekt mit 2 Formularen: Form1 ist das Hauptformular und Form2 ein weiteres Formular.

Ich habe beim Form2 eine Prozedur namens einstellungen deklariert:

Delphi-Quellcode:

  procedure FormDestroy(Sender: TObject);  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    procedure einstellungen;
  end;

Nun will ich mit
Form2.einstellungen diese Prozedur aus dem Form1 (!!!) aufrufen. Delphi sagt: Undefinierter Bezeichner einstellungen

In der Unit von Form1 steht auch unter uses die Unit2 (die UNit von Form2).

Ich verstehe nciht, warum Delphi das so nciht akzeptiert. Könnt Ihr mir helfen? Ich habe Delphi 5 professionell.

Beste Grüße
Ulrich

[nailor]

Hast du vielleicht statt form2.einstellungen unit2.einstellungen gemacht?

[ustra]

Hallo,

nein, ich habe schon Form2.einstellungen; geschrieben.

Was aber komischerweise geht ist, dass aus einer beliebigen Methode Form2.show; aufrufen kann. Das akzeptiert er problemlos.

Beste Grüße
Ulrich

[ustra]

Also,

ich habe eben noch mal etwas rumexperimentiert. Mein Projekt ist schon etwas mehr mit Inhalt gefüllt. ich habe aus dem Projekt alles rausgenommen. Es funktioniert trotzdem noch nicht. Irgendeine Einstellung muss es in Delphi sein.

Ich habe nämlich noch mal ein komplett neues Projekt mit zwei Formularen gemacht und es funktionierte auf Anhieb.

Vielleicht hilft das weiter.

Beste Grüße
Ulrich

[Christian Seehase]

Moin Ulrich,

Du darfst nicht vergessen die Unit1 unter Uses mit in Unit2 aufzunehmen, so dass es etwa so aussähe:

Delphi-Quellcode:

implementation

uses Unit1;

{$R *.DFM}

procedure TForm2.FormCreate(Sender: TObject);
begin
  Form1.Einstellungen;
end;

[ustra]

Hallo Chris,

das war es auch nicht. Ich hänge mal das Projekt ran.

Ulrich

[Christian Seehase]

Moin Ulrich,

ich denke ich hab's gefunden.

Bei Dir steht in Unit2:

Delphi-Quellcode:

var
  FSicherung: TForm;

da bei Dir das Formular aber TFSicherung heisst, müsste es so aussehen:

Delphi-Quellcode:

var
  FSicherung: TFSicherung;

[ustra]

Moin Christian,


vielen Dank, dass Du Dich um mein Problem gekümmert hast. Es war tatsächlich genau das das Problem. Noch mals vielen Dank für Deine Hilfe.

Beste Grüße
Ulrich