Вопль о помощи!!!!(ресурсы)

[gjghjc]

ЛЮДИ ПОМОГИТЕ!!!!!!!!!!
Или я тупой или чего то непонял!!!!!!
Хочу повторить этот пример:

Создание библиотеки ресурсов

Создаете проект ActiveX DLL - ResourceLib, запускаете Resource Editor из Add-Ins,
создаете файл ресурсов, присваиваете ресурсам идентификаторы.
Теперь переименовываете Class 1 в MainResources и в классе создаете такую функцию:

Public Function SetPicture(PicName As String) As Object
Set SetPicture = LoadResPicture(PicName0)
End Function

Для использования библиотеки нужно добавить ее к проекту в Project =>
References и в Form_Load загнать загрузку картинок:

Dim ResLib As New ResourceLib.MainResourcer
Image1.Picture = resLib.SetPicture("101")

Вроде все делаю по инструкции а VB мне пишет "Resource with identifier '101' not found".

[Sebas]

Не знаю как решить твою проблемму, но если ты сумеешь протащить из метода внешнего проекта картинку, КАК STDPICTURE, я дам тебе 10 БУТЫЛОК будвайзера!

[ShadowCaster]

Просто картинки с идентификатором "101" нет в файле ресурсов.

[gjghjc]

2Sebas Чегой - то я твою мысль не понял объясни поподробней
2ShadowCaster Ну как это нет когда я создаю файл ресурсов из трех иконок и четко своими глазами вижу три картинки с идентификаторами 101, 102, 103

[gjghjc]

В очередной раз вопль остался безответным

[Myxa]

А преобразовать строку "101" в цифирки ты не пробовал?

[gjghjc]

То есть вместо
Image1.Picture = resLib.SetPicture("101")
написать
Image1.Picture = resLib.SetPicture(101)
Так что ли.
Спасибо за совет добрый человек.
Прийду домой попробую!!!

[serix]

У меня было обсалютно тоже самое, пробовал раз тридцать, переписовал код, ничего не помогало. Один раз как-то случайно заработало, а я сдуру удалил исходник , теперь регулярно каждое удро бью себя за это по башке...

[Sebas]

Public Function SetPicture(PicName As String) As Object
Set SetPicture = LoadResPicture(PicName0)
End Function

Вот если при выход из метода в клиентском приложении ты не получишь `method failed, одним словом получишь картинку - я преклоняюсь.