Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#4

Re: Problem mit mehreren Typen in unterschiedlichen Units!

  Alt 8. Okt 2006, 16:16
Herzlich willkommen in der Delphi-PRAXiS, Alexander.

Eine gute Vorgehensweise ist folgende:

Delphi-Quellcode:
unit U_Main;
interface
// ...
type
  TForm1 = class(TForm)
    P_Intro: TPanel;
    L_INtro: TLabel;
    // ...
    procedure FormCreate(Sender: TObject);
    // ...
  private
    FHero: THero;
  public
    property Hero: THero read FHero;
  end;
// ...
implementation
// ...
procedure TForm1.FormCreate(Sender: TObject);
begin
  FHero := THero.Create;
  // ...
end;
So kannst du von überall her lesend auf Form1.Hero zugreifen, sobald du in den anderen Units in der implementation section die Uses-Klausel um die Unit U_Main erweitert hast.

Freundliche Grüße vom marabu
  Mit Zitat antworten Zitat