Programmcode aufteilen auf mehrere Units

[Phoenix]

Soweit ich weiss, kannst Du eine einzelne Methode nicht auf zwei Dateien aufteilen.

Im Regelfall mache ich eine Aufteilung so:

Klassendefinition: (In MeineKlassen.pas)

Delphi-Quellcode:

   MyClass1 = class(TObject)
      private
      protected
         procedure MyProcedure;
      public
          constructor Create; override;
   end;

   MyClass2 = class(MyClass1)
      private
      protected
         procedure MyProcedure; Override;
      public
          constructor Create; override;
   end;


implementation

uses Blafasel;

//--------------------------------------------------------------------------
// In den folgenden Dateien ($I für Include) sind die oben definierten Objekte implementiert:
//--------------------------------------------------------------------------
{$I MyClass1.pas}
{$I MyClass2.pas}

Implementation 1: (In MyClass1.pas)

Delphi-Quellcode:

// Constructor
constructor MyClass1.Create;
begin
   inherited;
   // Code
end;

procedure MyClass1.MyProcedure;
begin
   // Code
end;

Implementation 2: (In MyClass2.pas)

Delphi-Quellcode:

// Constructor
constructor MyClass2.Create;
begin
   inherited;
   // Code
end;

procedure MyClass2.MyProcedure; Override;
begin
   // Code
end;

[edit=Daniel B]Delphi-Tags ergänzt. MfG Daniel B.[/edit]