die Paintbox hat ja ein Canvas. ein
TBitMap hat auch eins. und per
CopyRect kann man da rundrum kopieren
EDIT: da du ja anscheinend ein anfänger bist, mal ein bisschen source code:
Delphi-Quellcode:
procedure loadbitmap(Paintbox: TPaintBox; Filename: string);
var b:TBitmap;
begin
try
b := TBitmap.create;
b.LoadFromFile(Filename);
Paintbox.canvas.Copyrect(rect(0,0,b.width,b.height),b.canvas,rect(0,0,b.width,b.height));
finally
b.free;
end;
end;
(Das ist jetzt nur so schnell hingetippt, wenn dir der Compiler einen fehler meldet, nicht gleich verzweifeln
)
Diese Prozedur kannst du ganz einfach in deine Delphi-
Unit einfügen und dann per
loadbitmap(Paintbox1,'C:\tolles_bild.bmp');
aufrufen.
Lukas Erlacher
Suche Grafiktablett. Spenden/Gebrauchtangebote willkommen.
Gotteskrieger gesucht!
For it is the chief characteristic of the religion of science that it works. - Isaac Asimov, Foundation I, Buch 1