VPF::Ввод данных в чужое окно. - Форум программистов

HAS

Дата 26.7.2006, 18:37 (ссылка)

(нет голосов)

Загрузка ...

Ing

Профиль
Группа: Участник
Сообщений: 170
Регистрация: 1.3.2005
Где: Internet

Репутация: нет
Всего: 2

Yanis, зачем же так иронично ?!
ОГРОМНОЕ ТЕБЕ СПАСИБО ! ! ! smile

Yanis

Дата 26.7.2006, 18:48 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111

HAS,
Пожалуйста.

Добавлено @ 18:49
Добавлю немного...
Не обязательно нажимать кнопку OK достаточно тому же hFontDlgCb послать нажатие VK_ENTER.

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

*щёлк*

Romikgy

Дата 26.7.2006, 20:16 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

Цитата(Yanis @ 26.7.2006, 17:21

)

// на форме hFondDlg 3 ComboBox'а
// по идее при первом выове должен находиться самый первый
// он то нам и нужен

странно а у меня небыло комбобоксов одни едиты smile

Цитата(Yanis @ 26.7.2006, 17:21

)

можно еще так искать
hFontDlg := FindWindow(nil, 'Font');

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

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Yanis

Дата 27.7.2006, 09:03 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111

Romikgy
Это странно так как должны быть 3 ComboBox'а со стилем csSimple.
Скачай программу iws. Через неё посмотри что у тебя там на форме: edit или combobox.

Это сообщение отредактировал(а) Yanis - 27.7.2006, 09:03

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

*щёлк*

Romikgy

Дата 27.7.2006, 10:03 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

Цитата(Yanis @ 27.7.2006, 08:03

)

Скачай программу iws. Через неё посмотри что у тебя там на форме: edit или combobox.

дык с помощью ее и смотрел
кса у меня вин 2000 мож изза этого ?

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

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Yanis

Дата 27.7.2006, 10:14 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111

Цитата(Romikgy @ 27.7.2006, 11:03

)

кса у меня вин 2000 мож изза этого ?

Может быть. Негде проверить. А парент у этого edit'а кто?

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

*щёлк*

Romikgy

Дата 27.7.2006, 10:44 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 13
Всего: 146

Цитата(Yanis @ 27.7.2006, 09:14

)

А парент у этого edit'а кто?

ComboBox

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

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Yanis

Дата 27.7.2006, 10:58 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111

Цитата(Romikgy @ 27.7.2006, 11:44

)

ComboBox

Что и требовалось доказать smile

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

*щёлк*

_sten_

Дата 13.12.2006, 00:01 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 184
Регистрация: 29.9.2006

Репутация: нет
Всего: 3

Мона SetWindowText использовать smile

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

WARNING: Condition 'to_be || !to_be' is always 'true' !

Kenni

Дата 22.5.2007, 20:15 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 28.4.2007

Репутация: нет
Всего: нет

У меня есть чюжое окно, там 2 Edit'a, как обратиться к этому окну и выснить кто есть кто, и во второй нужно вписать необходимую инфу...
Заранее спасибо!

Yanis

Дата 23.5.2007, 12:59 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111

Цитата(Kenni @ 22.5.2007, 21:15

)

У меня есть чюжое окно, там 2 Edit'a, как обратиться к этому окну и выснить кто есть кто, и во второй нужно вписать необходимую инфу...

Искать их в чужом окне (Поиск кстати обсуждался в этом топике. Поиск по форуму тоже поможет).
Находить нужный Edit, различая его по ID. ID содержится в информации о окне. Т.е.:

Код

LONG GetWindowLong(          HWND hWnd,
    int nIndex
);

Цитата(MSDN)

GWL_ID
Retrieves the identifier of the window.

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

*щёлк*

darkmamba

Дата 13.3.2009, 19:41 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 98
Регистрация: 16.10.2008

Репутация: нет
Всего: 1

А как перебирать то ? как получить другой дескриптор компонента под одним названием если их напрмер там 5 ?

Код


LONG GetWindowLong(          HWND hWnd,
    int nIndex
);

неподходит ибо ID у парочки = 0.
Проще перебрать дескрипторы на наичие чилдовых но как это сделать ?)

darkmamba

Дата 13.3.2009, 20:15 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 98
Регистрация: 16.10.2008

Репутация: нет
Всего: 1

Код


begin
  h1 := FindWindow('Afx:00400000:0', nil);
  h2 := FindWindowEx(h1, 0, 'Afx:00400000:8:00010011:00000000:00000000', 0);
  repeat
    h3 := FindWindowEx(h2, 0, 'Static', 0);
    if h3 <> 0 then begin
      showmessage('Static');
      h4 := FindWindowEx(h3, 0, 'AfxWnd70su', 0);
        if h4 <> 0 then begin
          showmessage('AfxWnd70su');
          h5 := FindWindowEx(h4, 0, 'RichEdit20W', 0);
            if h5 <> 0 then begin
            showmessage('RichEdit20W');

        end;
    end;
    h2 := GetNextWindow(h2, GW_HWNDNEXT);
  until h2 = 0;
end;

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »