Передать Picture в User Control

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Memfivosfey
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 212
Зарегистрирован: 17.02.2005 (Чт) 14:55

Передать Picture в User Control

Сообщение Memfivosfey » 17.12.2007 (Пн) 12:37

Подскажите пожалуйста, что я неправильно делаю?

В контроле:
Код: Выделить всё
Public Property Let AddPic(Pic As IPictureDisp)
    Set Picture1.Picture = Pic
End Property


В форме:
Код: Выделить всё
Private Sub Command2_Click()
    Set objChat.AddPic = LoadResPicture(101, 0)
End Sub


Пишет ошибку:
Invalid use if property

Скорее всего ошибка в синтаксисе, подскажите как правильно передать картинку из формы в User Control. Заранее спасибо.
В программировании нет не решаемых проблемм, есть проблеммы на которые
мы не можем найти решение...

BV
Thinker
Thinker
Аватара пользователя
 
Сообщения: 3987
Зарегистрирован: 12.09.2004 (Вс) 0:55
Откуда: Молдавия, г. Кишинёв

Сообщение BV » 17.12.2007 (Пн) 12:48

Let на Set, IPictureDisp на StdPicture.
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;

Memfivosfey
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 212
Зарегистрирован: 17.02.2005 (Чт) 14:55

Сообщение Memfivosfey » 17.12.2007 (Пн) 12:57

спасибо.
В программировании нет не решаемых проблемм, есть проблеммы на которые
мы не можем найти решение...

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 17.12.2007 (Пн) 12:59

Можно и Let оставить, в принципе (правда это не совсем правильно).
Только тогда в форме убери Set.
Lasciate ogni speranza, voi ch'entrate.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 34

    TopList