| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как заменить точку или запятую на DecimalSeparator [D6, Win2k]

Kaginava ©   (2003-02-07 09:52:00) 

Всем доброе утро, подскажите как заменить точку или запятую на DecimalSeparator и запретиь ввод всех символов кроме цифр в обработчике сообщения WM_KEYDOWN? я делаю так :
if (Msg.message = WM_KEYDOWN ) then
Begin
if ( msg.wParam in [ord("0")..ord("9"),96..105,37..40,8,9,13,109..110,188]) then
begin
if (msg.wParam=110) or (msg.wParam=188) then msg.wParam:=ord(DecimalSeparator) ;
Handled := False;
end
else
Handled:=True

end;и чего то не работает, подскажите кто может.
спасибо.

---

Романов Р.В.   (2003-02-07 11:08:00) [1]

http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1044520048&n=0

---

Kaginava   (2003-02-07 10:27:00) [2]

понятно, вопрос не кого не задел :(

---

Наверх