Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как получить данные из другой программы? 
:(
    Опции темы
Спартак
Дата 19.4.2008, 17:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Доброго времени суток!
Возникла такая проблма: есть 2 приложения. Одно генерирует строку и записывает ее в Edit. Второе должно по таймеру проверять содержимое строки первого приложения. 
Как найти окно - я знаю (пользуюсь FindWindow). Хэндл получаю. Как через этот хендл найти нужный мне Edit?? Тем более, что их (Edit-ов) может быть несколько
PM MAIL   Вверх
anwe
Дата 19.4.2008, 19:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: 4
Всего: 23
На форуме уже такое было, поищи.
Цитата(Спартак @  19.4.2008,  16:22 Найти цитируемый пост)
Как через этот хендл найти нужный мне Edit?? 

FindWindowEx
PM MAIL   Вверх
Спартак
Дата 19.4.2008, 19:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Цитата(anwe @ 19.4.2008,  19:41)
На форуме уже такое было, поищи.
Цитата(Спартак @  19.4.2008,  16:22 Найти цитируемый пост)
Как через этот хендл найти нужный мне Edit?? 

FindWindowEx


Поиск не работает :( у меня опера даже не дает ввести строку поиска :(
Код

uses
  SysUtils, Classes, Windows;
var
  h, h1: HWND;
  s : array[1..255] of char;
begin
  h := FindWindow(nil, 'Ýòî ïðîáíàÿ ôîðìà');
  writeln('h = ', h);
  h1 := FindWindowEx(h, 0, 'TEdit', nil);
  writeln(h1);
  writeln(GetWindowText(h1, @s, 255));
  writeln('s = ', s);
  readln;
end.

Это то, что есть... у меня во 2-й прогрмме 2 Edit-а. Получить текст удается только из одного... причем если в нем меняешь текст, то все равно выдается старый :(
PM MAIL   Вверх
anwe
Дата 19.4.2008, 20:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: 4
Всего: 23
Используй FindWindowEx еще раз с хэндлом наденного Edit'а. Начнется поиск со следующего дочернего окна.
PM MAIL   Вверх
Спартак
Дата 19.4.2008, 20:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Цитата(anwe @ 19.4.2008,  20:47)
Используй FindWindowEx еще раз с хэндлом наденного Edit'а. Начнется поиск со следующего дочернего окна.

за это спасибо smile но остался один нерешенный вопрос: при обновлении данных в Edit-е программа получает старую строку :(
PM MAIL   Вверх
MetalFan
Дата 20.4.2008, 10:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 16
Всего: 128
Цитата(Спартак @  19.4.2008,  20:52 Найти цитируемый пост)
программа получает старую строку

странно, не должно такого быть.


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
bems
Дата 20.4.2008, 10:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 21
Всего: 88
MetalFan, Классика! Браво!  smile

Добавлено через 2 минуты и 13 секунд
Спартак, а реально это не TMaskEdit?


--------------------
Обижено школьников: 8
PM MAIL   Вверх
MetalFan
Дата 20.4.2008, 12:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 16
Всего: 128
Цитата(bems @  20.4.2008,  10:23 Найти цитируемый пост)
MetalFan, Классика! Браво!  smile

эмм... не понял)


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
bems
Дата 20.4.2008, 14:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 21
Всего: 88
Цитата(MetalFan @  20.4.2008,  10:09 Найти цитируемый пост)
странно, не должно такого быть
тру программер  smile

Добавлено через 2 минуты и 24 секунды
Цитата
Результати 1 – 10 з приблизно 1,390 на запит "странно, не должно такого быть". (0.73 сек) 


Добавлено через 5 минут и 5 секунд
http://www.hare.ru/id=8.html


--------------------
Обижено школьников: 8
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0475 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.