Einzelnen Beitrag anzeigen

Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#1

Der linken Seite wird nichts zugewiesen "Extended Version"

  Alt 16. Okt 2013, 14:22
Delphi-Version: 2007
Ich hab folgende Records und eine Liste (Code ist schon etwas älter).

Delphi-Quellcode:
TQuer = record
private
  FIntergers, FFloats, FString..
public
  property Intergers, Floats, String.. read ... write ...
  procedure Clear;
end;

TStab = record
public
  QuerLeft: TQuer;
  QuerRight: TQuer;
  ..
  procedure CheckQuerRight;
end;

procedure TStab.CheckQuerRight;
var
  AQuer: TQuer;
begin
  AQuer.Clear;
  if QuerRight.Compare(AQuer) then
    QuerRight := QuerLeft;
end;

TStabList = class
private
  FItems: array of TStab;
public
  property Items[Index: integer]: TStab read GetItem write SetItem; default;
end;
Wenn ich von außen mit einer Instanz von TStabList ausführe
FStabList[I].CheckQuerRight; werden die Werte nicht in FStabList[I] übernommen?

Ist mir unverständlich? Ich hab doch QuerLeft bzw QuerRight public?
  Mit Zitat antworten Zitat