Methodenaufruf einer Methode von 2. Unit in 1. Unit nicht möglich!

Fehlermeldung: Dieser Form des Methodenaufruf ist nur für Klassenmethoden erlaubt!

Anfang von 2. Unit

zusammenfalten · markieren

Delphi-Quellcode:

unit untanmelden;

interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs,
  ComCtrls, TabNotBk, Menus, StdCtrls, Grids, DBGrids, ExtCtrls, Buttons, ToolWin,
  ActnMan, ActnCtrls;

type
  Anmeldung = class(TForm)
  private
  public
    procedure Anmelden;
  end;

implementation

uses Adoint, StrUtils, untVorlage_Screen;

procedure Anmeldung.Anmelden;
var

Aufruf erfolgt folgendermaßen:

markieren

Delphi-Quellcode:

procedure TfrmDBDoku.cmdAnmeldenPrClick(Sender: TObject);
begin
  //Anmeldung.MethodName(untanmelden.Anmeldung.anmelden);
  untanmelden.Anmeldung.anmelden;
end;

Die Fehlermeldung stimmt schon. Du brauchst ein instanziertes Objekt um eine "normale" Methode aufrufen zu können.

zusammenfalten · markieren

Delphi-Quellcode:

procedure TfrmDBDoku.cmdAnmeldenPrClick(Sender: TObject);
var
  dlg: Anmeldung;
begin
  dlg: Anmeldung.Create;
  try
    dlg.anmelden;
  finally
    dlg.Free
  end;
end;

[edit=r_kerber]Code- durch Delphi-Tags ersetzt. Mfg, r_kerber[/edit]

Habe es ausprobiert, aber es ist ein Fehler aufgetreten

code:

markieren

Delphi-Quellcode:

var
  dlg: Anmeldung;
begin
  dlg:= Anmeldung.Create;
  try
    dlg.anmelden;
  finally
    dlg.Free
  end;
end;

Fehler: "nicht genügend wirkliche Paramerter" in Zeile ( dlg:= Anmeldung.Create

Hallo,

im Constructor eines Formulars muss der Eigentümer angegeben werden, dem dieses Formular gehört. Wenn das Formular Deiner aufrufenden Klasse gehören soll, musst du den Constructor folgendermassen aufrufen:

dlg := Anmeldung.Create(Self); Ciao,
sepp001

Hallo,
es ist eine weitere Fehlermeldung aufgetreten: "Ressource Anmeldung nicht gefunden".

Hat doch funktioniert, danke!