![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Resourse File [D6, WinXP]
P. © (2002-04-05 18:48:00)Написано:
"Создать исходный файл ресурсов, куда можно включить и поименовать требуемые файлы с расширением BMP, к примеру:
- inout BITMAP "inout.bmp"
Сохранить этот файл с расширением RC.
Кто-нибудь может пояснить, а то я нихрена не понял(что значит "создать исходный файл ресурсов" и как сохранить ОДИН файл с расширением RC, когда рисунков штук 10).
Буду очень признателен.
Vcoder (2002-04-05 21:55:00) [21]Для чтения ресурса можно применить следующую процедуру:
procedure TForm1.Button1Click(Sender: TObject);
var
MyRes : TResourceStream;
begin
MyRes:=TResourceStream.Create(HInstance,"Bmp1",PChar("RT_BITMAP"));
try
Image1.Picture.Bitmap.LoadFromStream(MyRes);
finally
MyRes.Free;
end;
end;
А теперь уже фантазируй как тебе надо считывать все твои картинки: писать для каждого свою процедуру, передавать имя ресурса как параметр, создать массив... Все зависит от конкретной задачи.
PS. Кстати.У TBitmap есть функция LoadFromResourceName. Однако Image1.Picture.Bitmap.LoadFromResourceName(HInstance,"Bmp1) вызывает ошибку "ресурс не найден". Может кто знает, в чем дело?
Юрий Зотов (2002-04-05 21:02:00) [22]1. Обычным текстовым редактором в каталоге проекта создаем файл MyRes.rc с таким текстом:
BMP1 BITMAP "С:\Path1\File1.bmp"
BMP2 BITMAP "D:\Path2\File2.bmp"
и т.д. - хоть 10 картинок, хоть 110.
2. Из командной строки Даем команду
BRCC32 MyRes.rc
и в итоге там же появляется файл MyRes.res.
3. Подключаем его к программе:
{$R MyRes.res}
И все. Теперь все картинки будут сидеть внутри самого EXE - в его ресурсах. Доступны они по именам BMP1, BMP2 и т.д.
aus (2002-04-05 19:09:00) [23]Меню Tools - Image Editor