Private/Public in Unit mit gesammelten Funktionen ala Math

[himitsu]

Forwad kann man auch in der Implementation benutzen.

Delphi-Quellcode:

function XYZ: string;
  forward;

function ABC: string;
begin
  Result := XYZ;
end;

function XYZ: string;
begin
  Result := ABC;
end;

Delphi-Quellcode:

interface

function ABC:String;

implementation

function Hilfsfunktion:String;
begin
//Mach was
end;

function ABC:String;
begin
  Resulz := Hilfsfunktion;
end;

"neuere" Delphis (seit mindestens 2006) können auch Typen verschachteln. (engebettete Typen, oder wie man das nennt)

Delphi-Quellcode:

interface

type
  TPublicClass = class
  private type
    TPrivateClass = class
    end;
  private
    function PFunc: TPrivateClass;
  public

  end;

implementation

type
  TUnitPrivate = class
  end;