Скачать: CL | DM;

Как заменить точку или запятую на DecimalSeparator   Найти похожие ветки 

← →
Kaginava ©   (2003-02-07 09:52) [0]

Всем доброе утро, подскажите как заменить точку или запятую на 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; и чего то не работает, подскажите кто может.
спасибо.

---

← →
Kaginava ©   (2003-02-07 10:27) [1]

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

---

← →
Романов Р.В. ©   (2003-02-07 11:08) [2]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.019 c