Re: How to compile?
От: Oleg A. Bachin Украина  
Дата: 17.06.04 13:55
Оценка: 4 (2)
Здравствуйте, nort, Вы писали:

N>Мне нужно скомпилить в один файл (exe) все используемые ресуры, это несколько .mp3, и группа картинок .bmp, .jpg, .gif,

N>Подскажите как такое можно сделать.

создать ресурсный файл, скомпилить его и включить в проект

1.
ixupgrade.rc

r_039304e3_cv   RCDATA   "039304e3.cv"
r_039304e3_cvo  RCDATA   "039304e3.cvo"    
r_04e30393_cv   RCDATA   "04e30393.cv"     
r_04e30393_cvo  RCDATA   "04e30393.cvo"


2.

brc32 -r ixupgrade.rc


3.
юзаем например так:

procedure save(res_name, file_path, file_name: string);
var
  rs: TResourceStream;
begin
  rs := TResourceStream.Create(HInstance,
    PChar(res_name), RT_RCDATA);
  try
    rs.SaveToFile(file_path + file_name);
  finally
    rs.Free;
  end;
end;
Best regards,
Oleg A. Bachin
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.