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

Вниз

Проблема с загрузкой Bitmap ов из .res-файла   Найти похожие ветки 

 
Denned   (2005-10-25 08:32) [0]

Здравствуйте! У меня возникла проблема следующего характера. Имеется: файл ресурсов с несколькими Bitmap"ами. В обработчике события OnPaint формы расположен следующий код:
 for X:=1 to 61 do begin //Счетчик битмапов
   Bitmap := TBitmap.Create;
   Bitmap.LoadFromResourceName(hInstance, BitmapName[X]);
   MainForm.Canvas.Draw(Pos[X].X, Pos[X].Y, Bitmap);
   Bitmap.Free;
 end;
Проблема:1)на первом шаге цикла X"у почему-то присваивается значение 61(!!!), а не 1;2)на первом шаге Bitmap считывается и отрисовывается в Canvas формы, на втором ни с того ни с сего выдается ErrorMessage "Resource такой-то not found", хотя он в действительности существует. Я в шоке! Ничего не могу понять!
Уважаемые Гуру, знает ли кто-нибудь из вас, где тут собака зарыта?


 
ZeroDivide ©   (2005-10-25 08:45) [1]

BitmapName, Pos - какого типа?
> 1)на первом шаге цикла X"у почему-то присваивается значение
> 61(!!!)

Попробуй оптимизацию отключить. with Pos[X] ни где раньше не стоит?
> ни с того ни с сего выдается ErrorMessage "Resource такой-
> то not found"

Ну значит not found. Проверь .res файл.


 
Denned   (2005-10-25 09:07) [2]

BitmapName типа ShortString (массив)
Pos - pointer

> Попробуй оптимизацию отключить. with Pos[X] ни где раньше
> не стоит?

with Pos[X] нигде нет.
Как ни странно, в дебаггере X=61, BitmapName[X]=последнее название картинки, а реально X=1(???),и картинка грузится ПЕРВАЯ(???!!!).

> Ну значит not found. Проверь .res файл.

С рез файлом все в порядке. Сто раз проверял...Самое главное - почему находится первая картинка и не находится вторая? Ведь они почти полностью совпадают!


 
Denned   (2005-10-25 10:01) [3]

Проблема решилась - сделал все через ID"шники.



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

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

Наверх




Память: 0.47 MB
Время: 0.025 c
2-1129563459
Rasher
2005-10-17 19:37
2005.11.13
Вопрос о всплывающих окнах


14-1130154592
Del_programmer
2005-10-24 15:49
2005.11.13
Другая жизнь...


11-1111257733
rofl
2005-03-19 21:42
2005.11.13
linux + fpc + kol


14-1129361812
Anton_Uz
2005-10-15 11:36
2005.11.13
Компоненты


1-1130226491
Horovodov
2005-10-25 11:48
2005.11.13
Работа с командной строкой