Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.09;
Скачать: CL | DM;

Вниз

Похоже, я разучился собирать res-файл...   Найти похожие ветки 

 
Aleksandr.   (2005-09-20 15:26) [0]

rc-файл gifs.rc следующего содержания:

L1 RCDATA "a1.gif"
L2 RCDATA "a2.gif"
L3 RCDATA "a3.gif"
HOUR RCDATA "hour.gif"
CONNECT RCDATA "connect.gif"
EDIT RCDATA "edit.gif"
STOP RCDATA "stop.gif"
SMILE1 RCDATA "smile1.gif"
SMILE2 RCDATA "smile2.gif"
SMILE3 RCDATA "smile3.gif"
SMILE4 RCDATA "smile4.gif"
SMILE5 RCDATA "smile5.gif"
SMILE6 RCDATA "smile6.gif"
SMILE7 RCDATA "smile7.gif"

выполняю brcc32 gifs.rc, создается gifs.res. В программе его подключаю в главном окне:

{$R *.dfm}
{$R gifs.RES}

Запускаю программу - на половине попыток
LoadFromResourceName она меня посылает типа ресурс не найден.
Смотрю на файл ресурсов через Image Editor - там полный бред пишется, дерево с левыми названиями и ссылками, видны только нормально отрабатывающие иконки. Что за фигня?


 
Aleksandr.   (2005-09-20 16:30) [1]

Вообще ниче не понимаю... Сделал такой метод:

var
 x : cardinal;
 j : integer;
 P : Pointer;
begin
   FStream:=TMemoryStream.Create;
   try
     x:=FindResource(HInstance,PChar(ResName),RT_RCDATA);
     if x<>0 then begin
       j:=SizeOfResource(hInstance,x);
       P:=LockResource(x);
       FStream.Write(P^,j);
       FStream.SaveToFile(ResName+".gif");
       FreeResource(X);
     end
 finally
   FStream.Free
 end
end;

Так вот апишными методами ресурс находится, но содержимое полученного файла совсем не гифовое... То ли он в ресурсы кривым попадает, то ли я совсем в маразм впал...


 
Fay ©   (2005-09-20 16:31) [2]

2 Aleksandr.   (20.09.05 15:26)
Просто прибей .rc к проекту, чё будет?


 
Fay ©   (2005-09-20 16:34) [3]

2 Aleksandr.   (20.09.05 16:30) [1]
А LoadResource ен нужен?


 
Aleksandr.   (2005-09-20 16:49) [4]

Ох мля... надо же так лопухнуться...
Про .rc: она ругается... грит, что унсуппортед


 
Fay ©   (2005-09-20 16:53) [5]

2 Aleksandr.   (20.09.05 16:49) [4]
>> Ох мля... надо же так лопухнуться...
Хде?

>> Про .rc: она ругается... грит, что унсуппортед
Ты добавил его к проекту ({$R "YourRes.res" "YourRes.rc"}) и он ругнулся КОГДА?

Короче, работает?


 
Aleksandr.   (2005-09-20 17:29) [6]

Fay ©  :
После LoadResource работает.

При добавлении к проекту ругается на этапе компиляции. Ну и фиг с ней, будем на уровне winapi вытаскивать.


 
Fay ©   (2005-09-20 17:33) [7]

2 Aleksandr.   (20.09.05 17:29) [6]
>> ругается на этапе компиляции
Это сурово...



Страницы: 1 вся ветка

Текущий архив: 2005.10.09;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.022 c
1-1127201618
Barloggg
2005-09-20 11:33
2005.10.09
Какой вызов процедуры быстрее?


2-1125498230
NataM
2005-08-31 18:23
2005.10.09
ActiveXForm


14-1126990328
WonderfulDay
2005-09-18 00:52
2005.10.09
За сколько времени можно выучить Дэлфи?


14-1127220352
oldman
2005-09-20 16:45
2005.10.09
Бабы мочут, как хочут...


4-1123600876
CTPAX.RU
2005-08-09 19:21
2005.10.09
Ошибка при чтении и записи в порт