Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#8

Re: Komponente erweitern

  Alt 14. Nov 2006, 19:09
Ich würde aus dem Record eine Klasse machen.
Das lohnt sich sobald auf die Daten Funktionen angewendet werden
Delphi-Quellcode:
TDaten = class(TPersistent)
   public
   // die internen Variablen bleiben zunächst public
   // später können diese in Properties verpackt werden
   Name: WideString;
   Anzahl: Integer;
   WertProStueck: Integer;
   function GetGesamtwert:integer; // = Anzahl*WertProStueck
   procedure Clear;
   function AsFormatedString:Ansistring;
end;
Andreas
  Mit Zitat antworten Zitat