TBitmap.LoadFromResouceName - истина где-то рядом?

← →
Vcoder © (2002-04-07 12:33) [0]

Дано: файл bmps.rc:

Bmp1 BITMP "beany.bmp" Bmp2 BITMP "intl_no.bmp" Bmp3 BITMP "w.bmp"

В программе загружаем картинку, например:

procedure TForm1.Button1Click(Sender: TObject); var MyRes : TResourceStream; begin MyRes:=TResourceStream.Create(HInstance,"Bmp1",PChar("BITMP")); try Image1.Picture.Bitmap.LoadFromStream(MyRes); finally MyRes.Free; end; end;

И все работает. НО! При попытке загрузить так:
Image1.Picture.Bitmap.LoadFromResouceName(HInstance,"BMP1");
вызывает исключение EResNotFound "Resource BMP1 not found".
Пробовал нумеровать ресурсы и использовать функцию Bitmap.LoadFromResouceID(HInstance,1) - вызывает исключение "Access Violation at adress...".

И тут я подумал: Ведь в TResourceStream.Create мы указываем не только имя ресурса ("Bmp1"), но и тип ("BITMP"). Может и тут надо каким-то образом указать тип ресурса? Пробовал "BITMP\BMP1", "BITMP/BMP1" - ноль. ResNotFound и хоть ты тресни. Кстати, когда я назвал ТИП ресурса "BITMAP" (естественно, перекомпилировав .res файл), у меня вообще перестало работать, включая и первый способ.

Может кто-нибудь прольет свет на эти странности?

← →
Vcoder © (2002-04-08 20:05) [1]

Ну неужели никто не знает ?!?

← →
[MC]NuClon (2002-04-08 20:25) [2]

А чем первый способ не нравится??? 8)

1) Громоздко
2) Хочу получить ответ, почему не работает LoadFromResouceName

TBitmap.LoadFromResouceName - истина где-то рядом? Найти похожие ветки