Function Aufruf aus andere Unit

[DeddyH]

Zur Veranschaulichung:

Delphi-Quellcode:

type
  TDingens = class
  public
    // Methode
    procedure TuWas;
    // Klassenmethode
    class procedure TuwasAnderes;
  end;

...

procedure TDingens.TuWas;
begin
  ShowMessage('Ich bin die Methode einer Instanz von TDingens');
end;

class procedure TDingens.TuwasAnderes;
begin
  ShowMessage('Ich bin eine Klassenmethode und brauche keine Instanz');
end;

Aufrufe:

Delphi-Quellcode:

procedure TSomeForm.Tuwas;
var
  Dingens: TDingens;
begin
  // Instanz erzeugen, benutzen und freigeben
  Dingens := TDingens.Create;
  try
    Dingens.TuWas;
  finally
    Dingens.Free;
  end;
end;

procedure TSomeForm.TuwasAnderes;
begin
  // Geht auch ohne Instanz
  TDingens.TuwasAnderes;
end;