TImage zur Laufzeit positionieren

[bluescreen25]

Zitat von SirThornberry:

Zitat:

Image2.Width := 210;
Image2.Height := 60;
Image2.Top := 250;
Image2.left := 10;

Leute? was soll das? Nen größeren Performancekiller gibts kaum. Dadurch wird 4 mal SetBounds aufgerufen was beim TImage ein 4maliges neu berechnen des anzuzeigenden Bildes bewirkt!!
Wenn dann doch bitte so
Image2.SetBounds(10, 250, 210, 60);

Also nochmal: Welchen Unterschied gibt es zwischen den folgenden Möglichkeiten ?

Delphi-Quellcode:

Image2.SetBounds(0, 164, 210, 60); //left,top,width,height
Image2.Picture.LoadFromFile(extractfilepath(paramstr(0))+'button.jpg');

und dieser hier:

Delphi-Quellcode:

button:=tjpegimage.Create;
button.LoadFromFile(extractfilepath(paramstr(0))+'button.jpg');
Image2.SetBounds(0, 164, 210, 60); //left,top,width,height
Image2.Canvas.Draw(0,0,button); //x,y innerhalb des image2
button.Free;