Алгоритм вывода разных картинок в image1 при определенных действиях

@Ph1l1n · Регистрация: 12.12.2014

Author24 — интернет-сервис помощи студентам

Помоги пожалуйста - не знаю как в XE6 реализовать такую задачу: есть image1, есть поле edit1 в котором при написании "1" или "2" выводилась та или иная картинка в image1 , заранее загруженные и хранящиеся в программе для использования на android

@ToT888 · 17.12.2014, 07:00

Delphi

Uses System.IOUtils;
...
 
if edit1.text = '1' then  image1.bitmap.loadfromfile(TPath.Combine(TPath.GetDocumentsPath, 'Имякартинки1'));
if edit1.text = '2' then  image1.bitmap.loadfromfile(TPath.Combine(TPath.GetDocumentsPath, 'Имякартинки2'));

@Ph1l1n · 17.12.2014, 12:00 **[ТС]**

Сообщение от ToT888

2
3
4
5
Uses System.IOUtils;
...
if edit1.text = '1' then *image1.bitmap.loadfromfile(TPath.Combine(TPath.GetDocumentsPath, 'Имякартинки1'));
if edit1.text = '2' then *image1.bitmap.loadfromfile(TPath.Combine(TPath.GetDocumentsPath, 'Имякартинки2'));

Это все хорошо), но я имел ввиду чтобы файл загружался не из файла, а так я уже сам нашел путь решения проблемы с загрузкой в ресурсы, которые загружаем в поток:

Delphi

begin
 image1.Bitmap.LoadFromStream(rs_jpg);
end;
 
procedure TForm5.FormCreate(Sender: TObject);
begin
if findresource(0, 'jpg1', PChar(RT_RCDATA))<>0 then
 rs_jpg:=TResourceStream.Create(0, 'jpg1', PChar(RT_RCDATA));

@Ph1l1n 0 / 0 / 1 Регистрация: 12.12.2014 Сообщений: 2
		1
	Алгоритм вывода разных картинок в image1 при определенных действиях 12.12.2014, 15:06. Показов 1198. Ответов 2 Метки нет (Все метки) Помоги пожалуйста - не знаю как в XE6 реализовать такую задачу: есть image1, есть поле edit1 в котором при написании "1" или "2" выводилась та или иная картинка в image1 , заранее загруженные и хранящиеся в программе для использования на android 0

	17.12.2014, 12:00

Алгоритм вывода разных картинок в image1 при определенных действиях

Решение