Autor Beitrag
MH
Hält's aus hier
Beiträge: 11

Win XP
D3, D2005
BeitragVerfasst: Mi 26.11.08 10:31 
Moin,

Ich versuche gerade Typisierte Dateien über eine eigene Klasse zu steuern. Mein Problem ist das ich bei den propertys
immer die Fehlermeldung Inkompatible Typen bekomme.

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
type
   TAdresse = record
   Name: String[20];
   Nachname: String[20];
   end;

   TFile = class
   private
      fAdresse: TAdresse;

   public
      property Name: String read fAdresse.Name write fAdresse.Name; //Inkompatible Typen "ShortString" und "String"
      property Nachname: ShortString read fAdresse.Nachname write fAdresse.Nachname; //nur noch Inkompatible Typen

   end;

Ist es überhaupt möglich eine Datenverwaltum auf diese Art auszulagern? Wäre für die übersicht natürlich schön :wink:

Ich hoffe mir kann jemand helfen.
Danke schon mal im Vorraus
Gammatester
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 328
Erhaltene Danke: 101



BeitragVerfasst: Mi 26.11.08 13:02 
Wie wär's mit folgendem (ohne Fehler in Delphi 6)?

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
type
   TMyString = string[20];
type
   TAdresse = record
   Name: TMyString;
   Nachname: TMyString;
   end;

   TFile = class
   private
      fAdresse: TAdresse;

   public
      property Name: TMyString read fAdresse.Name write fAdresse.Name; 
      property Nachname: TMyString read fAdresse.Nachname write fAdresse.Nachname; 
   end;


Gruß Gammatester