Bitmap anzeigen

Ice · Beiträge: 114

Hallo Leute,

ich möchte gerne mit einer ImageKomponente Bitmaps anzeigen und diese zur Laufzeit wechseln können, Wenn ich in einer Listbox das ensprechende Bild auswähle.
Wie kann ich das machen?
Im voraus schonmal vielen Dank.

mfg
Ice

smiegel · Verfasst: Mo 10.02.03 09:49

Hallo,

was steht in der Listbox? Der Dateiname? Wenn ja, dann wie folgt:

markieren

Quelltext

1:
2:
3:
4:
5:

procedure TForm1.ListBox1Click(Sender: TObject);
begin
  with TListBox(Sender) do if FileExists(Items[ItemIndex]) then 
    Image1.Picture.LoadFromFile(Items[ItemIndex]);
end;

_________________
Gruß Smiegel
Ich weiß, daß ich nichts weiß, aber ich weiß mehr als die, die nicht wissen, daß sie nichts wissen. (Sokrates)

Ice · Beiträge: 114

Ja vielen Dank.

mfg Ice

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme