Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c