Einzelnen Beitrag anzeigen

mjustin

Registriert seit: 14. Apr 2008
3.006 Beiträge
 
Delphi 2009 Professional
 
#8

AW: Lokale Typdefinitionen wo?

  Alt 4. Jul 2010, 21:30

Wenn ich den record innerhalb der Klasse deklariere, steht er nur in der Klasse zur Verfügung. Ich brauche ihn aber noch mehrmals in der Unit ausserhalb der Klasse.
Das ist nur bei Verwendung von strict private richtig. Bei einfachem private ist der Typ TYourType.TYourRecord in der gesamten Unit verwendbar:

Delphi-Quellcode:
type
  TYourType = class
  private
    type
      TYourRecord = record
        a: Integer;
      end;
  end;

  TType2 = class
  procedure X(A: TYourType.TYourRecord);
  end;

implementation

procedure TType2.X(A: TYourType.TYourRecord);
begin
end;

procedure Y(A: TYourType.TYourRecord);
begin
end;
(Delphi 2009)
Michael Justin
habarisoft.com
  Mit Zitat antworten Zitat