powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / dim withevents
25 сообщений из 25, страница 1 из 1
dim withevents
    #35198950
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Друзья! я не программист, очень нужна ваша помощь. Мне надо переделать один контрол. он приводился в качестве примера к SDK, оцх закрыто. контрол обращался к объекту:
Dim StccObj As New STCCOrders
Dim WithEvents ActiveObj As ActiveOrders

требует отсутствующую библиотеку.
есть другая библиотека, где я могу получить объект STCCOrders как свойство другого объекта:
...
Рейтинг: 0 / 0
dim withevents
    #35198956
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
продолжу. есть другая библиотека, где я могу получить объект STCCOrders как свойство другого объекта, но при попытке обратится выскакивает "type mismatch":
Dim StccObj As New ORtrade.application.STCCData
Как быть?
...
Рейтинг: 0 / 0
dim withevents
    #35199717
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: NestorXM
> Друзья! я не программист, очень нужна ваша помощь.

Лучше найми программиста ;)

> Мне надо переделать один контрол. он приводился в качестве примера к
> SDK, оцх закрыто. контрол обращался к объекту:
> Dim StccObj As New STCCOrders
> Dim WithEvents ActiveObj As ActiveOrders
>
> требует отсутствующую библиотеку.
> есть другая библиотека, где я могу получить объект STCCOrders как
> свойство другого объекта:

Если библиотека отсутствует, то откуда не пытаться брать объект, его все
равно не появится. БиблиОтики то нет ;)

> Автор: NestorXM
> продолжу. есть другая библиотека, где я могу получить объект
> STCCOrders как свойство другого объекта, но при попытке обратится
> выскакивает "type mismatch":

Если можешь получать как свойство, так и получай как свойство:
Dim StccObj As New STCCOrders
> Set StccObj = ORtrade.application.STCCData


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35200139
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Тогда VB пишет "User-defined type not defined"
...
Рейтинг: 0 / 0
dim withevents
    #35200202
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: NestorXM
> Тогда VB пишет "User-defined type not defined"

Тогда это когда????????? На 17 строке?

Для того что-бы не писал, нужно подключить или библиотеку(*.dll, *.exe) или
описание типов(*.tlb) в которой описан этот тип(который кстати :) ) Если
этого нет, тогда нужно объявлять переменную как Object. Но раз библиотеки
нет, то это не поможет. Ищи библиотеку.

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35200545
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
тогда это при попытке запустить. Объясню еще раз. с помощью свойства ORTrade.applications.STCCData объект STCCOrders получить удается, но без событий.
мне надо чтобы первые строки выглядели примерно так:

Dim StccObj As New ORTrade.applications.STCCData
Dim WithEvents ActiveObj As ActiveOrders

но тогда он ругается
...
Рейтинг: 0 / 0
dim withevents
    #35200675
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: NestorXM
> тогда это при попытке запустить. Объясню еще раз. с помощью свойства
> ORTrade.applications.STCCData объект STCCOrders получить удается, но без
> событий.
> мне надо чтобы первые строки выглядели примерно так:
>
> Dim StccObj As New ORTrade.applications.STCCData
> Dim WithEvents ActiveObj As ActiveOrders
>
> но тогда он ругается

Опять двадцать пять! :)
Тогда какого типа он не видит, что ругается на его отсутствие?
Есть ли события у ActiveObj As ActiveOrders?
Как получаешь объект ActiveOrders для ActiveObj?

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35200701
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Запись ORTrade.applications.STCCData некорректна. Нельзя... эээ... объявить тип из свйства.
Тип - это ORTrade. applications.STCCData - это свойство.
Можно объявить Dim StccObj as Object, а потом в процедуре сделать Set StccObj = что-то-там.applications.STCCData. Это во-первых. Во-вторых, если какая-то библиотека возвращает объект, имеющий тип, который описан в другой библиотеке, а этой библиотеки нет, то можно вообще не дергаться. Работать не будет и возвращающая объект библиотека. Если она таки работает, значит все есть, просто вторая библиотека не подключена в референсах.

NestorXMМне надо переделать один контрол. он приводился в качестве примера к SDK, оцх закрыто. контрол обращался к объектуЗдесь описаны два противоречащих друг другу факта - "оцх закрыто" и "контрол обращался к объекту". Если "оцх закрыто", то откуда известно как и к чему он обращается. Что вообще значит "закрыто"? Если это значит "нет исходников", то как может идти речь о "переделать"?
...
Рейтинг: 0 / 0
dim withevents
    #35200875
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
еще раз попробую объяснить.
все что вы предлагали я проделал еще до этого и все работает-одна проблема. нет событий объекта STCCOrder, а так все работает. а мне как раз нужны события, поэтому нужно как то сразу обратиться к объекту через withevents. а сразу не получается, только через свойство(((
...
Рейтинг: 0 / 0
dim withevents
    #35200979
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Все равно нифига не понятно.
Вам известна разница между классом, объектом и свойством?
Вы уверены, что STCCOrder это класс и у него есть события? Если таки да, то конструкция Dim WithEvents StccObj as STCCOrder должна работать.
...
Рейтинг: 0 / 0
dim withevents
    #35201019
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
вот SDK . описание очень скудное:

The Application Object is the main object exposed by the container consisting of open workspaces, window objects, and their options. The Application Object provides access to saving workspaces, changing window properties, and modifying any existing objects' properties. The Application Object also contains properties which point to the ATCCAlerts object, STCCOrders, and MessageLog object.
---------------------------------------------------------------------------
STCCOrders Object

Description

The STCCOrders Object contains references to the Tracking Center's Open Positions, Active Orders, Filled Orders and Canceled Orders.

---------------------------------------------------------------------------------

ActiveOrders Collection

Description

The ActiveOrders Collection contains all the entries that are displayed in the Active Orders tab of the Tracking Center.

Properties: Count/Parent

Methods: Add Item/Cancel/Remove/Fill/Reset/GetOption/SetOption

Events: Add/ Modify/Cancel/Remove/Fill
...
Рейтинг: 0 / 0
dim withevents
    #35201097
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: NestorXM
> вот SDK . описание очень скудное:

Попробуй списатся с разработчиками. Они то уж точно подскажут как правильно

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35201125
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Описание корявое, его автор походу тоже не знает разницы между классом, свойством и объектом. Изучайте кнопку F2, Object Browser даст больше информации, чем это описание.
авторSTCCOrders Object

Description

The STCCOrders Object contains references to the Tracking Center's Open Positions, Active Orders, Filled Orders and Canceled Orders.Здесь почти прямым текстом написано, что у класса STCCOrders есть только четыре свойства и ни одного события. WithEvents отдыхает.
...
Рейтинг: 0 / 0
dim withevents
    #35201142
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: Antonariy
> Описание корявое, его автор походу тоже не знает разницы между
> классом, свойством и объектом. Изучайте кнопку F2, Object Browser даст
> больше информации, чем это описание.
> автор
> STCCOrders Object
>
> Description
>
> The STCCOrders Object contains references to the Tracking
> Center's Open Positions, Active Orders, Filled Orders and Canceled Orders.
> Здесь почти прямым текстом написано, что у класса STCCOrders есть
> только четыре свойства и ни одного события. WithEvents отдыхает.

Повелитель! :)
WithEvents пытаятся получить от объекта класса ActiveOrders, у которого
есть:
ActiveOrders Collection
Events: Add/ Modify/Cancel/Remove/Fill
согласно описанию, но при этом в реализации могу быть несоответствия
документации, поэтому автор этого всего дела может помочь быстрее :)

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35201179
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Насколько я понял по
Dim StccObj As New STCCOrders
Dim WithEvents ActiveObj As ActiveOrders

Dim StccObj As New ORTrade.applications.STCCData
Dim WithEvents ActiveObj As ActiveOrdersпроблема именено в StccObj , а не ActiveObj.
...
Рейтинг: 0 / 0
dim withevents
    #35201222
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: Antonariy
> Насколько я понял по
>
> Dim StccObj As New STCCOrders
> Dim WithEvents ActiveObj As ActiveOrders
>
> Dim StccObj As New ORTrade.applications.STCCData
> Dim WithEvents ActiveObj As ActiveOrders
> проблема именено в StccObj , а не ActiveObj.

Я так и не понял, в чем у него проблема :(, кроме того что нужна подписка на
события объекта, которую не получаеться получить, когда ругается на
неопределенный тип, почему нужно именно так, а не по другому. Крутим две
строчки и так и этак, а каменный цветок не выходит :)

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35201299
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Все правильно сформулировано! Нужна подписка на события. проблема именно в этом, что STCCOrders никак не получить кроме как через свойства(((
...
Рейтинг: 0 / 0
dim withevents
    #35201331
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: NestorXM
> Все правильно сформулировано! Нужна подписка на события. проблема
> именно в этом, что STCCOrders никак не получить кроме как через
> свойства(((
Да кто мешает? Я пытался получить от тебя примерно такой код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Dim mORTrade as New ORTrade '<- Здесь указать тип ORTrade
Dim StccObj As STCCOrders
Dim WithEvents ActiveObj As ActiveOrders

Private Sub Form1_Load()
    Set StccObj = mORtrade.application.STCCData
    Set ActiveObj = StccObj.ActiveOrders
End Sub
что бы понять, где и что не правильно используется/объявляется


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35201384
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
NestorXMНужна подписка на события. Я же вроде ясно сказал, что у STCCOrders нет никаких событий, подписка на STCCOrders невозможна, WithEvents as STCCOrders работать не будет. Ну какое словосочетание еще придумать?
...
Рейтинг: 0 / 0
dim withevents
    #35201399
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
у меня примерно такой код и есть. Ругается на STCCOrders "user-defined type not defined"

Dim ORApp As New ORTrade.Application
Dim STCCobj As STCCOrders
Dim WithEvents ActiveObj As ActiveOrders



Private Sub UserControl_Initialize()
Set ORApp = New ORTrade.Application
Set STCCobj = ORApp.STCCData
Set ActiveObj = STCCobj.ActiveOrders
Set OpenObj = STCCobj.OpenPositions
Set FilledObj = STCCobj.FilledOrders
Set CanceledObj = STCCobj.CanceledOrders

End Sub
...
Рейтинг: 0 / 0
dim withevents
    #35201522
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: NestorXM
> у меня примерно такой код и есть. Ругается на STCCOrders
> "user-defined type not defined"
Наконец-то!
>
> Dim ORApp As New ORTrade.Application <- Это
> Dim STCCobj As Object 'STCCOrders <- здесь так сделай
> Dim WithEvents ActiveObj As ActiveOrders
>
>
>
> Private Sub UserControl_Initialize()
> Set ORApp = New ORTrade.Application <- и это, что-то лишнее
> Set STCCobj = ORApp.STCCData
> Set ActiveObj = STCCobj.ActiveOrders
> Set OpenObj = STCCobj.OpenPositions
> Set FilledObj = STCCobj.FilledOrders
> Set CanceledObj = STCCobj.CanceledOrders

или вообще так :)
with ORApp.STCCData
> Set ActiveObj = .ActiveOrders
> Set OpenObj = .OpenPositions
> Set FilledObj = .FilledOrders
> Set CanceledObj = .CanceledOrders
end with
>
> End Sub

как теперь?

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
dim withevents
    #35201567
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
теперь он на Dim WithEvents ActiveObj As ActiveOrders грешит.
...
Рейтинг: 0 / 0
dim withevents
    #35201600
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Все понятно. Код скопипастен, ни одна библиотека не подключена.
Project - References - Browse - находишь свои библиотеки.
...
Рейтинг: 0 / 0
dim withevents
    #35201635
NestorXM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
не надо делать поспешных выводов(с). библиотека подключена. еще раз-напрямую обратиться к долбанному STCCOrder нельзя! а он отдает событие activeorders_add которые и нужны. а без событий все работает
...
Рейтинг: 0 / 0
dim withevents
    #35201659
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: NestorXM
> не надо делать поспешных выводов(с). библиотека подключена. еще
> раз-напрямую обратиться к долбанному STCCOrder нельзя! а он отдает событие
> activeorders_add которые и нужны. а без событий все работает

Значит кривая реализация выдачи интерфейса событий, обратись к
разработчикам, им виднее как правильно подписыватся на события их объектов

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
25 сообщений из 25, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / dim withevents
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]