Deklaration

[Hellcat]

Hi Leute!

Folgendes Probelem: Ich hab eine Prozezur auf der Haupt-Unit geschrieben, hab nun eine zweite Form hinzugefügt und die Prozedur auf die neue Unit verlegt. Beim Compilieren erhalte ich jettz immer folgende Meldung:
"[Error] UnitLS.pas(14): Unsatisfied forward or external declaration: 'TForm2.speichern'"

Frage: Wo muss ich den Verweis auf die Prozedur ändern um diesen Fehler abzustellen?

Prozeduraufruf:

Delphi-Quellcode:

procedure TForm1.Speichern1Click(Sender: TObject);//Menüpunkt "Speichern"
begin
  speichern;
end;

Uses und Type der neuen Unit:

Delphi-Quellcode:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,ExtCtrls, unittype;

type
  TForm2 = class(TForm)
    ListBox1: TListBox;
    Button1: TButton;
    Button2: TButton;
    procedure speichern;

[Phoenix]

Du hast nur den Aufruf verschoben.

Du musst auch die Implementierung in die 2. Unit ziehen und dann aus dem Hauptform über Form2.Speichern aufrufen.

Also:

Code:

Procedure TForm1.Speichern;
begin
  // blafasel
end;

muss auch nach Form2.

[Hellcat]

Das Ereignis was die Prozedur aufruft passiert aber nach wie vor noch auf Form1...oder ist das in diesem Fall irrelevant?

[Hellcat]

Ok, ich hab's anders gelöst, aber jetzt stehe ich wieder vor einem Deklarationsproblem (deswegen hab ich keinen neuen Thread aufgemacht @mods)
Er gibt mir bei folgender Zeile die Fehlermeldung "Undeclared Identifier"

Form2.ListBoxLaden.Items.Add(DateTimeToStr(Now)); Wie muss ich die Form2 unter Uses deklarieren damit ich diesen Fehler erschossen kriege?

[APP]

Hallo,
wenn ich Dich richtig verstanden habe, hast Du auf Form2 eine Listbox mit Namen ListBoxLaden.

Code der Form1:

Delphi-Quellcode:

UNIT Unit1;

...
IMPLEMENTATION

USES Unit2;

{$R *.DFM}

PROCEDURE TForm1.Button1Click(Sender: TObject);
BEGIN
   Form2.ListBoxLaden.Items.Add(DateTimeToStr(Now));
   Form2.Show;
END;

Wenn Du nur Form2.ListBoxLaden.Items.Add(DateTimeToStr(Now)); schreibst, und in der IDE auf Start drückst, sollte dich Delphi darauf aufmerksam machen, das Form2 in der Deklaration fehlt und Dir anbietet Form2 selbstständig einzubinden.

[Hellcat]

Hab ich aber gemacht und erhalte trotzdem diese Meldung...

Also, schildern wir das Problem mal ausführlicher:
Die UnitLS gehört zur Form2. Auf Form2 befindet sich eine ListBox, bei der die Einträge über eine Funktion erfolgen die sich auf der Unitfunc befindet.

Uses der Haupt-Unit

Delphi-Quellcode:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, unittype, unitfunc,unitls, Menus, ExtCtrls, StdCtrls, ActnList, StdActns;

Uses der Unitfunc

Delphi-Quellcode:

uses SysUtils, ExtCtrls, StdCtrls, Controls, Classes, Graphics, Dialogs,Forms,
     unittype;

Uses derUnitLS

Delphi-Quellcode:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,ExtCtrls, unittype;

Anweisung zum Schreiben in der Listbox (auf der Unitfunc)
 Form2.ListBoxLaden.Items.Add(DateTimeToStr(Now));