Thema: Delphi Klasse in Klasse

Einzelnen Beitrag anzeigen

barf00s
(Gast)

n/a Beiträge
 
#9

Re: Klasse in Klasse

  Alt 3. Jun 2005, 13:18
Zitat von LoL:
hi

Ich habe eine Klasse die ich von TLineSeries abgeleitet habe. Als eigenschaft habe ich eine andere Klasse asl Eigenschafts-kontainer von TPersistent abgeleitet. Wie kann ich nun in einer Funktion der Klasse von TPersistent auf die Funktionen der Übergeorneten Klasse zugreifen?

Delphi-Quellcode:

procedure TdddLineSeries.SetProzDesc(Value : TProcessDescription);
begin
  if not(CompareMem(@Value, @FProzDesc, sizeof(Value))) then
    FProzDesc := Value;
end;
darauf kannst auch verzichten ... ein einfaches

Delphi-Quellcode:
if FProzDesc <> Value then
  FProzDesc := Value;
tuts auch.
achja und "sizeof(value)" wäre ja "sizeof(classinstance)" klassen sind pointer und die größe von pointern wäre 4 - also würdest du WENN du das schon mit dem comperemem so machst nur die ersten 4 bytes vergleichen
  Mit Zitat antworten Zitat