[Valentinich]

есть такая проблемка, необходимо сделать маленький поисковичёк картинок. при вводе имени в СomboBox нужно чтобы находилась картинка с таким же именем. И ещё , как лудше чтоб картинки просто были в одной папке с исходником, или уже в Form1?
Заранее Благодарен

[ryderx34]

если СomboBox, то полагаю возможные варианты уже вписаны в Items
вот вариант:

Код:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  case ComboBox1.ItemIndex of  // если вариант из Items
  0: Image1.Picture.LoadFromFile('file_0.bmp');
  1: Image1.Picture.LoadFromFile('file_1.bmp');
  2: Image1.Picture.LoadFromFile('file_2.bmp');
  else  // если другая картинка (из папки где лежит программа)
    if FileExists(ExtractFilePath(Application.ExeName) + ComboBox1.Text + '.bmp') then
      Image1.Picture.LoadFromFile(ExtractFilePath(Application.ExeName) + ComboBox1.Text + '.bmp');
  end;
end;

[Valentinich]

не хочет ,блин

[ryderx34]

Как делал? Покажи свой код.