Показать сообщение отдельно

  #5403  
Старый 09.01.2010, 12:08
patcher
Познающий
Регистрация: 15.12.2009
Сообщений: 81
С нами: 8634231

Репутация: 24
Wink

Цитата:
Сообщение от НTL  
Как в программу записать файл с изображением (При компиляции), а потом добавлять его к другим картинкам, которые выберет пользователь?
Если на Дельфях то так:

1. Создаем в блокноте файл такого содержания:
Код HTML:
IMAGE1 IMAGE <путь к изображению>
и сохраняем его под именем image.rc
2. Идем в каталог с Дельфи\Bin и ищем там brcc32.exe.
3. С его помощью brcc32.exe компилим image.rc (перетягиваем image.rc на brcc32.exe).
4. Рядом с image.rc появится файл image.res. Берем его и ложим в папочку с проектом. В проекте подключаем.
Код:
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}
{$R image.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.
Цитата:
Сообщение от НTL  
добавлять его к другим картинкам, которые выберет пользователь?
Вот эта часть вопроса не совсе понятна, поэтому просто посмотри как сохранить эту картинку. Вот написана мной процедура для сохранения ресурсов:
Код:
procedure extractres(ResName, ResType, filename:string);
Var ResStream: TResourceStream;
Begin
ResStream:=TResourceStream.Create(HInstance,pchar(ResType),pchar(ResName));
ResStream.SaveToFile(filename);
ResStream.Free;
End;
Пример использования для вышеописанного:
Код:
..................
var s:string;
begin
s:='C:\image.jpg'; //путь для сохранения
extractres('IMAGE', 'IMAGE1', s);
..................
[/CODE]
 
Ответить с цитированием