Bilddateien auf Vorrat laden für spätere Darstellung in TBitmap

[Frickler]

Zitat von haentschman:

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.