With Auflösen Refactoring?

[uligerhardt]

Zitat von himitsu:

Zitat:

Delphi-Quellcode:

with ListView1.Items.Add do
begin
  Caption := 'wupp';
  SubItems.Add('di');
  ImageIndex := 42;
end;

Delphi-Quellcode:

var I := ListView1.Items.Add;
I.Caption := 'wupp';
I.SubItems.Add('di');
I.ImageIndex := 42;

Hat Redeemer ja geschrieben - lokale Variable einführen.