Здравствуйте! У меня возникла проблема следующего характера. Имеется: файл ресурсов с несколькими 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", хотя он в действительности существует. Я в шоке! Ничего не могу понять!
Уважаемые Гуру, знает ли кто-нибудь из вас, где тут собака зарыта?