Текущий архив: 2002.04.08;
Скачать: CL | DM;

Вниз

Tresourcestream   Найти похожие ветки 

← →
SeF ©   (2002-03-27 02:34) [0]

Доброго времени суток!
скажите что здесь не так?

var
myres:Tresourcestream;
begin
try
{1} myres:=Tresourcestream.Create(application.Handle, "MYDLL", pchar("MYTYPE"));
finally
myres.Free;
end;
end;


.RC файл:
MYDLL MYTYPE mylib.dll

проблема: в строке 1 в run-time вылетает ошибка ресурс не найден.
компилится на ура.

---

← →
Suntechnic ©   (2002-03-27 07:36) [1]

С application.Handle ты перемудрил. Пиши вот так и не ошибёшься:
myres:=Tresourcestream.Create(0, "MYDLL", pchar("MYTYPE"));

---

← →
SeF ©   (2002-03-28 00:19) [2]

10ks

---

Страницы: 1 вся ветка

Текущий архив: 2002.04.08;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.01 c