Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
 
Delphi 11 Alexandria
 
#17

Re: Bezeichnungen eines Records über Item ermitteln

  Alt 5. Mär 2006, 23:30
Ich habe dich da falsch verstanden, mit einem normalen Record wird das aber sicherlich schwer. Ween du aber einen Klasse benutzt könnte man das über properies erreichen.

Delphi-Quellcode:
type
   TStammdaten = class
    Items: Array[0..8] of string[40];
  public
    function getTitel: ShortString;
    procedure setTitel( value: ShortString);
    property TITEL: ShortString read getTitel write setTitel;
    ...
end;

 ...

function TStammdaten.getTitel: ShortString;
begin
   result := Items[0];
end;

procedure TStammdaten.setTitel(value: ShortString);
begin
  Items[0] := value;
end;
Markus Kinzler
  Mit Zitat antworten Zitat