Moin...
Zitat:
Problem gelöst
...kann ich mir nicht vorstellen...du hast immer noch das
with drin.
Jetzt wirds off topic...
Um
with adäquat ablösen zu können, braucht man m.E. zwingend inline-Variablen.
with verkürzt ja nicht nur den Ausdruck, sondern begrenzt auch den Scope. Eine prozedurglobale Variable macht das eben nicht.
Statt mit "with"
Delphi-Quellcode:
with TBla.Create, TControl(Controls[i]) do begin
property1 := 1;
property2 := Left;
end
schreibt man mit Inline-Variablen
Delphi-Quellcode:
begin
var x := TBla.Create; var y := TControl(Controls[i]);
x.property1 := 1;
x.property2 := y.Left;
end
...und x sowie y gelten
nur hier, nicht 10 Zeilen davor und nicht 20 Zeilen dahinter.