Импорт изображений из файла Delphi

Question

Я знаком со скриптами на Delphi, поэтому мне, в принципе, нужно сильное направление, с которого можно начать. Я сделал импорт изображений из файлов на других языках, и это было довольно тривиально, но я не могу найти небольшую документацию по этому поводу для Delphi.

Мне нужно иметь возможность зарегистрировать управляющее событие на кнопке, которая откроет диалог «выбрать папку / файл», а затем импортировать изображение в объект, который я могу добавить в какой-либо список.

У кого-нибудь есть документация по этому поводу?

Answer 1

Хотя ваш вопрос довольно широкий и интересный «скрипты на Delphi», вот пример, который может помочь вам начать:

Проект: позволить пользователю выбрать изображение и отобразить это изображение

Эта форма содержит TButton, TOpenPictureDialog и простой TImage для отображения одного изображения (извините, в этом примере нет списка изображений).

Часть 1 («зарегистрировать управляющее событие на кнопке»):

Присоедините обработчик событий OnClick к кнопке, дважды щелкнув кнопку в конструкторе форм. Если Name вашей кнопки имеет значение btnOpenPicture, то автоматически сгенерированный обработчик будет иметь имя btnOpenPictureClick (см. Следующий код). Код в этом обработчике будет выполнен, когда пользователь нажмет кнопку.

procedure TForm1.btnOpenPictureClick(Sender: TObject);
begin
  if OpenPictureDialog1.Execute(Self.Handle) then
    Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;

Часть 2 («Dialouge« выберите папку / файл ») представлена ​​OpenPictureDialog1.Execute, которая открывает диалоговое окно, в котором пользователь может выбрать изображение. Команда Execute ожидает, пока пользователь закроет диалоговое окно, и вернет True, если пользователь решил не отменять диалоговое окно, а выбрал файл изображения (имя файла хранится в OpenPictureDialog1.FileName).

Часть 3 («импортировать изображение в объект») будет тогда Image1.Picture.LoadFromFile, которая инструктирует компоненту TImage загрузить и отобразить файл, выбранный пользователем.

Я не могу сразу назвать компонент, включенный в Delphi, который можно легко использовать в качестве списка для визуального отображения изображений (это ваше «добавление в какой-то список»). Я знаю только некоторые сторонние компоненты, которые не доступны бесплатно, поэтому не подходят для быстрых экспериментов.

Может быть, это может послужить основой для постановки более конкретных вопросов (как это уже поощряется комментаторами вашего вопроса) У меня уже есть один: «Есть ли компонент VCL, который я мог бы использовать для отображения списка изображений?»

Answer 2

Есть много статей и учебных пособий о том, как это сделать. Код для загрузки изображений можно найти в этом вопросе Stackoverflow ; чтобы решить вашу проблему, вам нужен TButton и, вероятно, TOpenPictureDialog .