Вставка текста в чужой DBEdit

[Artro]

В чужом приложении нужно заполнить программно форму.

sendmessage(h,wm_settext,0,lparam(p char('text'))); - на обычных эдитах работает норм, в DBEdit (на некоторых) не показывает до получения фокуса, в любом случае после потери фокуса значение теряется.

Каким образом можно програмно скинуть текст в ДБ компоненты, чтобы текст оставался там вне зависимости от фокуса?

[Spawn™Production®]

А Вы уверены, что текст там не сбрасывается, например, по событию валидации или LostFocus/Leave. Если там что-то программно заложено, то заполнять будет проблематично...

[Artro]

Сообщение от Spawn™Production®

А Вы уверены, что текст там не сбрасывается, например, по событию валидации или LostFocus/Leave. Если там что-то программно заложено, то заполнять будет проблематично...

при вводе с клавиатуры данные остаются на месте.

вот нашел: „Сразу предупреждаю КАТЕГОРИЧЕСКИ НЕ СЛЕДУЕТ ПЫТАТЬСЯ ИЗ КОДА МЕНЯТЬ ЗНАЧЕНИЯ В ВИЗУАЛЬНЫХ КОМПОНЕНТАХ, не следует пытаться менять или читать значения из BDGrid, DBEdit и т.д. Эти компоненты существуют только для работы оператора „вручную”. Для доступа к данным из кода нужно использовать только невизуальные компоненты типа TTable...”

Но поскольку прога не моя, то и доступ есть только к DBEdit. Вопрос в том, как скинуть в него текст, чтобы он не терялся.

[Spawn™Production®]

можно попытаться сэмулировать нажатия, т.е. посылать не WM_SETTEXT, а WM_KEYDOWN + WM_KEYUP. Гемороя больше, но эффект должен быть лучше.

[Artro]

Сообщение от Spawn™Production®

можно попытаться сэмулировать нажатия, т.е. посылать не WM_SETTEXT, а WM_KEYDOWN + WM_KEYUP. Гемороя больше, но эффект должен быть лучше.

спс, разобрался. сделал так:
s :='text';
k:=Length(s);
SendMessage(hwnd,WM_SETFOCUS,1,0);
for i:=1 to k do SendMessage(hwnd,WM_CHAR,Word(s[i]), 0);
SendMessage(hwnd,WM_SETFOCUS,1,0);

[Spawn™Production®]

Ну, да, или WM_CHAR, как результирующее