Поиск объектов на форме

[AndreyIl]

Есть чужая форма. На ней: TextBox, Label, CommandButton и т.д.

Как передать фокус конкретному объекту, не зная его имя или название, и выполнить действие (нажать кнопку, изменить текст и т.д.)?

[Antonariy]

А что вообще известно о конкретном объекте? Только то, что его не может не быть?

[keks-n]

ИМХО, надо отловить hWnd всех контролов на форме, а потом просто получаем название класса и всё.

Ежели форма у тя перед глазами, то посчитай, скока раз после её загрузки надо нажать Tab для перехода к нужному контролу, потом посылай етой форме Tab'ы в нужном кол-ве, а затем пробел.

[AndreyIl]

Если можно, приведите код, с помощью которого можно узнать hWnd, классы и т.д.?

[Konst_One]

API-Guide еще никто не отменял + поиск по форуму конечно

[AndreyIl]

Есть пример кода или ссылка на подобную тему, т.к. по поиску мало что нашел.

[tyomitch]

Я, точно так же как Antonariy, до сих пор не понял вопроса.
Что про нужный объект известно-то?

[Antonariy]

Похоже нужно GetActiveWindow + EnumChildWindows

[AndreyIl]

Форма Form1. На ней Text1, Command1, Label1 и т.д. (как пример).

Смотрел примеры через FindWindwow и FindWindwowEx - не то.

Есть ли у кого пример кода, как это все найти на форме и совершить
действие с объектами?

[tyomitch]

Что про нужный объект известно-то?

[AndreyIl]

Я же написал: обычная форма, на ней текстовое поле, кнопка и метка.

Какая еще информация нужна?

[tyomitch]

Нужно найти все три контрола?

Код: Выделить всё

Dim c As Control
For Each c In Me
    Debug.Print c.Name
Next


[AndreyIl]

Нужно найти все объекты.
Форма чужая.

[Antonariy]

Точно, GetActiveWindow + EnumChildWindows

[AndreyIl]

Если не сложно, выложи пример.

[Antonariy]

Если не сложно, воспользуйся поиском.
В нете примеров на EnumChildWindows навалом, а у меня вот нет.

[AndreyIl]

Спасибо за совет.