With Class1, Class2 do

[r2c2]

Zitat von smudo:

Wow, einfache typisierte Pointer. Das klingt mir wenig verlockend.

Warum? Je nachdem, was du machst, kann das IMHO deutlich übersichtlicher sein, als ein with ohne Alias...

Delphi-Quellcode:

var
  value: <TypVonValues>;
begin
  ...
  value := cxGridLsKopfDBTableViewLsKopf.TcxGridDataRow(ViewData.Records[i]).Values[...];
  value.Methode;
  value.Property := test;
  ...

Du musst ein with weniger, ein do weniger und einen begin..end-Block weniger schreiben. Dafür nur ein Zeilchen mehr und hast dafür auch noch n sprechenden Alias...

mfg

Christian