Здравствуйте формучане! Изучаю Firemonkey, нужна функция работы с ресурсами:
if FindResource(0, '1', PChar(RT_RCDATA)) <> 0 then rs_img:=TResourceStream.Create(0,'1',PChar(RT_RCDATA));
данные с идентификатором "1" читает, но нужно просмотреть все картинки из ресурсов, пробовал так:
for i:=1 to 5 do
begin
if FindResource(0, IntToStr(i), PChar(RT_RCDATA)) <> 0 then rs_img:=TResourceStream.Create(0, IntToStr(i),PChar(RT_RCDATA));
end;
Не компилит, просит тут IntToStr(i) себe PCha ...
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83284