Как убрать или спрятать кнопку на InputBox?

← →
kukuikar (2004-08-20 15:11) [0]

Пробю так:
procedure TForm1.InputBoxSetPasswordChar(var Msg: TMessage); var hInputForm, hEdit, hButton: HWND; begin hInputForm := Screen.Forms[0].Handle; if (hInputForm <> 0) then begin hEdit := FindWindowEx(hInputForm, 0, "TEdit", nil); hButton := FindWindowEx(hInputForm, 0, "TButton", nil); <color = red>SendMessage(hButton, BN_DISABLE, 0, 0);</color> SendMessage(hEdit, EM_SETPASSWORDCHAR, Ord("*"), 0); end; end;
Не работает.
В чем фишка.
Спасибо заранее....

← →
Игорь Шевченко © (2004-08-20 15:55) [1]

> В чем фишка.

В отсутствии проверки на ошибки, в первую очередь.
В неуважении к окружающим - во вторую.

← →
kukuikar (2004-08-20 15:59) [2]

А где же ответ?
Ответивший есть а ответа нет!?

← →
kukuikar (2004-08-20 16:02) [3]

В чем же мое неуважение к окружающим,
уважаемый г-н Шевченко?
Если вы намекаете на авторство кода, то я и не утверждаю что это я его автор. Взял я его из проекта DelphiWorld 6.0.
И не скрываю этого.

← →
Игорь Шевченко © (2004-08-20 16:14) [4]

kukuikar (20.08.04 16:02) [3]

> А где же ответ?

По-моему, в [1] был явно дан ответ на вопрос, в чем фишка.

> В чем же мое неуважение к окружающим,

В том, что они должны выполнить проверку на ошибки, которую не желает делать автор вопроса, для этого им нужно перенести к себе часть кода, создать проект, добиться его аналогичной ошибки и найти причину. Дальше продолжать ?

← →
kukuikar (2004-08-20 16:23) [5]

Уважаемый Игорь.
Нижайше прошу прощения за глупость которую я принес в Вамш форум.
Каим я был глупым. А ведь если вместо строки:
SendMessage(hButton, BN_DISABLE, 0, 0)
вставить строку:
SendMessage(hEdit, EM_SETPASSWORDCHAR, Ord("*"), 0)
то все работает.
Интересно почему EM_SETPASSWORDCHAR работает, а
BN_DISABLE нет.
Я конечно тупой и опыта у меня нет. Извините конечно, но если Вы такой опытный почему бы Вам не помочь и не указать бы на мою ошибку? Ведь Вам, программерам с большим опытом....
да ладно.........................................
Спасибо.

Вот это уже конструктивный диалог.

> А ведь если вместо строки:
> SendMessage(hButton, BN_DISABLE, 0, 0)
> вставить строку:
> SendMessage(hEdit, EM_SETPASSWORDCHAR, Ord("*"), 0)
> то все работает.
> Интересно почему EM_SETPASSWORDCHAR работает, а
> BN_DISABLE нет.

Потому что BN_DISABLE - это нотификация, а не сигнал к действию.

EnableWindow (hButton, false) не поможет ?

← →
kukuikar (2004-08-20 16:32) [7]

EnableWindow(hButton, false) помогло.
Огромное спасибо.
Вы помогаете уже не впервый раз:))))))))))))

← →
kukuikar (2004-08-20 16:32) [8]

Удалено модератором
Примечание: Дубль

Как убрать или спрятать кнопку на InputBox? Найти похожие ветки