CheckListBox mit TImage

[StoRmtec]

Hy @all

Ich hätte da mal eine Fragen.
Und zwar ich lese meinen Ordner mit den Bilder in einer CheckListBox aus alos es steht dann der Bilder Namen drinnen. Jetzt möchte ich wenn ich zB. einen Bildernamen anklicke das dann in meiner TImage das Bild angezeigt wird.

Wäre schön wenn mir wer helfen könnte.

Mfg
StoRmtec

[Mirilin]

:hi:

Wenn du den kompletten Dateinamne anzeigst könntest Du es so machen.

Delphi-Quellcode:

procedure TMainForm.CheckListBoxClick(Sender: TObject);
var
  Index : Integer;
begin
  Index := CheckListBox.ItemIndex;
  if  Index > -1 then
  begin
    Image.Picture.LoadFromFile(CheckListBox.Items[Index]);
  end;
end;

[StoRmtec]

Hy Mirilin

Danke er funktioniert super.

Mfg
StoRmtec