Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

D2010 и ресурсы

Ярослав © (2010-08-05 01:45:00)
Здравствуйте.

Через менеджер ресурсов добавляю ресурсы.
В файле ресурсов <проект>Resource.rc они есть
test RCData "test.txt"

при компиляции <проект>.dres содержит информацию про ресурс.
ресурсы подключены
program <проект>; {$R *.dres}

при обращении к ресурсу
stream:= TResourceStream.Create(HInstance, 'test', 'RCData');

--------------------------- Debugger Exception Notification --------------------------- Project <проект>.exe raised exception class EResNotFound with message 'Resource test not found'. --------------------------- Break Continue Help ---------------------------

не находит.
Как лечить?

ПС.
На D7 пользовался brcc32.exe - работало нормально.

Anatoly Podgoretsky (2010-08-05 22:30:00) [1]
> Ярослав (05.08.2010 21:41:04) [4]

Я с таким сталкивался на Д3, тогда проблему решил просто, заменил только
имена.

KilkennyCat (2010-08-05 22:20:00) [2]
program test;

{$APPTYPE CONSOLE}

uses
SysUtils,
Classes;
const
RT_RCDATA = PChar(10);

var
stream: TResourceStream;
begin
stream := TResourceStream.Create(HInstance, 'TEST', RT_RCDATA);

end.

Ярослав (2010-08-05 22:12:00) [3]

> а при создании консольных ресурсы .dres создаются??

Да, создался автоматически.

> Леонид абсолютно правильный пример привел, копайте.
> windows.pas
> RT_RCDATA = Types.RT_RCDATA;

RT_RCDATA решил проблему.
Всем спасибо!

KilkennyCat (2010-08-05 22:06:00) [4]
а при создании консольных ресурсы .dres создаются??

KilkennyCat (2010-08-05 22:04:00) [5]
Леонид абсолютно правильный пример привел, копайте.
windows.pas
RT_RCDATA = Types.RT_RCDATA;

types.pas
RT_RCDATA = PChar(10);

Ярослав (2010-08-05 21:41:00) [6]

> Leonid Troyanovsky

[DCC Error] test.dpr(13): E2003 Undeclared identifier: 'RT_RCDATA'
Не могу понять какой модуль нужно подключить :(

> mike

> Anatoly Podgoretsky

К сожалению TEST не помог :(

Тестовый пример:
program test; {$APPTYPE CONSOLE} {$R *.dres} uses SysUtils, Classes; var stream: TResourceStream; begin stream := TResourceStream.Create(HInstance, 'TEST', 'RCData'); end.

файл ресурса
TEST RCData "test.txt"

Выкладываю тестовую копию на яндесе, как я это делаю.
http://narod.ru/disk/23459251000/test.zip.html
Если кто-то может проверьте пожалуйста, возможно это баг IDE D2010.

Anatoly Podgoretsky (2010-08-05 09:09:00) [7]
TEST

Leonid Troyanovsky (2010-08-05 07:54:00) [8]

> Ярослав © (05.08.10 01:45)

> stream:= TResourceStream.Create(HInstance, 'test', 'RCData');

stream:= TResourceStream.Create(HInstance, 'test', RT_RCDATA);

--
Regards, LVT.

mike (2010-08-05 02:32:00) [9]
А имя ресурса именно "test"? Обрати внимание на регистр символов.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »