Трабл с UserControl

[DimPos]

Вопр. такой:
В модуле:
Type Nametype
Varname1 as Typedata1
Varname2 as Typedata2
и т.д.
End type

А в Usercontrol:

Function()as Nametype

End Function
или
Sub()as Nametype

End Sub

короче ни то ни другое не работает (мессага вылезает),хотя в обычном ЕХЕ этот номер прокатывает

Может кто знает как можно это сделать?-неужели нужно в модуле класса все прописывать?

[Cyrax]

и как это называется?
а имя функции где?

а процедуры As не бывают. на то они и процедуры, что не возвращяют значений.

[GSerg]

Это ограничение VB. Нельзя, чтобы функция-член класса возвращала параметр пользовательского типа, если только этот тип не описан в публичном модуле. Таковым считается только модуль из проекта activex exe или activex dll. Так что когда очень нужно такое, я создаю дополнительный проект activex dll и в нём описываю все типы. Маздай

[DimPos]

Но в этом случае к ocx файлу нужно еще и цеплять dll, а хотелось бы обойтись одним ocx-ом - может быть есть другие варианты?

cyrax - имя функции может быть любым - не в этом вопрос, с Sub я и в самом деле ошибся - я имел ввиду Property

В идеале мне нужно сделать свойство наподобие Font
то есть скажем обращение к размеру выглядит
ControlName.Font.Size=...
только у меня будет
ControlName.TypeName.Var1=...
вот тока не знаю как бы это сделать...

[GoGosha]

Но в этом случае к ocx файлу нужно еще и цеплять dll, а хотелось бы обойтись одним ocx-ом - может быть есть другие варианты?

cyrax - имя функции может быть любым - не в этом вопрос, с Sub я и в самом деле ошибся - я имел ввиду Property

В идеале мне нужно сделать свойство наподобие Font
то есть скажем обращение к размеру выглядит
ControlName.Font.Size=...
только у меня будет
ControlName.TypeName.Var1=...
вот тока не знаю как бы это сделать...

Имя почти какое угодно но оно должно присутствовать

[DimPos]

сиракс не будь снобом, спрашивал я не о том какое имя должно быть у функции

[GSerg]

Объявляй проперть как stdfont

[DimPos]

GSerg читай внимательнее - я знаю как проперть объявить если нужен font
мне нужно объявить проперть наподобие stdfont то есть при использовании контрола обращение из использующей программы выглядело так же, как выглядит обращение к stdfont, но тип данных при этом должен быть таким каким мне нада
ControlName.TypeName.Var1=...

[alibek]

Используй классы вместо типов. И будет тебе счастье.

[Sebas]

Public Type Nametype

[GSerg]

Если бы

[GoGosha]

Но в этом случае к ocx файлу нужно еще и цеплять dll, а хотелось бы обойтись одним ocx-ом - может быть есть другие варианты?

cyrax - имя функции может быть любым - не в этом вопрос, с Sub я и в самом деле ошибся - я имел ввиду Property

В идеале мне нужно сделать свойство наподобие Font
то есть скажем обращение к размеру выглядит
ControlName.Font.Size=...
только у меня будет
ControlName.TypeName.Var1=...
вот тока не знаю как бы это сделать...

Public Prop As IFontDisp

[DimPos]

Alibek пасиб - уже использую
Слушайте, из вас получились классные флудильщики , если не сказать больше...