Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Поиск эдита на форме.

vitv © (2007-04-20 10:32:00)
Ищу следующим образом:
Wnd := FindWindow(nil,'Zadanie');
EditWnd := FindWindowEx(Wnd, 0,'tedit', 'Edit3');
ShowMessage(inttostr(Wnd));
ShowMessage(inttostr(EditWnd));

Окно находит, эдит - нет.

{RASkov} (2007-04-20 14:46:00) [1]
> [6] Novice (20.04.07 12:36)
> то проще в DLL реализовать и экспортировать отдельную функцию

[1] Reindeer Moss Eater © (19.04.07 15:31)
не. невозможно.
ДЛЛ же не имеет возможности экспортировать функции возвращающие значения.
:")
> vitv ©
В Dll
function GetEditNumberThree: Int64;
begin
Result:=<FormInDll>.Edit3.Handle;
end;
:^) Нет.... ты что-то не то делаешь, и твоя задача явно по другому решается....

Leonid Troyanovsky (2007-04-20 14:40:00) [2]

> vitv © (20.04.07 12:34) [5]

> Я вызываю модалью форму из длл. На модальной форме есть
> эдид, значение которого нужно кинуть в эдит на главной форме

Достойны похвалы люди, не боящиеся бороться с трудностями.
И создающие их собс-ручно, когда их не хватает.

--
Regards, LVT.

Novice (2007-04-20 12:36:00) [3]
В таком случае, если известно точно, что искомый компонент - именно Edit, и именно тот, из которого нужно кинуть данные, то проще в DLL реализовать и экспортировать отдельную функцию, которая возвращает значение Edit.

vitv (2007-04-20 12:34:00) [4]

> А нафига надо то ?

Я вызываю модалью форму из длл. На модальной форме есть эдид, значение которого нужно кинуть в эдит на главной форме :)))

vitv (2007-04-20 11:24:00) [5]
vitv © (20.04.07 11:01) [3]

Сделал так:
Wnd := FindWindow(nil,'Zadanie');
EditWnd := FindWindowEx(Wnd, 0,'tedit', nil);
ShowMessage(inttostr(Wnd));
ShowMessage(inttostr(EditWnd));

Но нужно обращаться к эдит3.

> ANB © (20.04.07 10:53) [2]
> > 'Edit3'Вот это лишнее. сделай '' и если эдит на форме
> один, то найдет.А нафига надо то ? Спай поставь и не парся
> - он все найдет :)

Можно подробнее?

vitv (2007-04-20 11:01:00) [6]
Сделал так:
Wnd := FindWindow(nil,'Zadanie');
EditWnd := FindWindowEx(Wnd, 0,'tedit', nil);
ShowMessage(inttostr(Wnd));
ShowMessage(inttostr(EditWnd));

Но не нужно обращаться в эдит3.

> ANB © (20.04.07 10:53) [2]
> > 'Edit3'Вот это лишнее. сделай '' и если эдит на форме
> один, то найдет.А нафига надо то ? Спай поставь и не парся
> - он все найдет :)

Можно подробнее?

ANB (2007-04-20 10:53:00) [7]

> 'Edit3'

Вот это лишнее. сделай '' и если эдит на форме один, то найдет.
А нафига надо то ? Спай поставь и не парся - он все найдет :)

clickmaker (2007-04-20 10:35:00) [8]
FindWindowEx ищет по имени класса и тексту окна, а не по имени компонента. Потому как в терминах ОС компонентов нет, только окна

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »