Bmp's von Festplatte laden

[Gast_1]

Wie kann ich Bilddateien ohne sie in die Exe-Datei mit einzulinken von der Festplatte laden?

[Gerhard Seyfarth]

Ganz einfach mit dem Befehl LoadFromFile(AFileName).
Außerdem mußt du dich für einen Container entscheiden (Image, Paintbox)
z.B.:
var MyBitmap:TBitmap;
begin
MyBitmap:=TBitmap.Create;
MyBitmap.LoadFromFile('C:\Bild1.bmp');
//....
//und später:
MyBitmap.Free

[Andreas Kosch]

Hallo,

das folgende Beispiel stammt aus der Delphi-Hilfe zum Thema <b>TGraphic.LoadFromFile</b>:
<pre>
procedure TForm1.Button1Click(Sender: TObject);

var
BitMap1,BitMap2 : TBitMap;
MyFormat : Word;
begin
BitMap2 := TBitMap.Create;
BitMap1 := TBitMap.Create;
try
BitMap1.LoadFromFile('c:\Programme\common Files\Borland Shared\Images\Splash\256color\factory.bmp');
BitMap2.Assign(BitMap1); // BitMap1 in BitMap2 kopieren
BitMap2.Dormant; // GDI-Ressourcen freigeben
BitMap2.FreeImage; // Speicher freigeben
Canvas.Draw(20,20,BitMap2); // Vorherige Aufrufe verlieren das Bild nicht

BitMap2.Monochrome := true;
Canvas.Draw(80,80,BitMap2);
BitMap2.ReleaseHandle; // Jetzt wird das Bild freigegeben;
finally
BitMap1.Free;
BitMap2.Free;
end;
end;
</pre&gt

[Gast_1]

Vielen Dank für deine schnelle Antwort, du hast mir damit sehr weitergeholfen