Цитата:
|
Сообщение от wetalq
Код:
if not (Key in ['0'..'9',DecimalSeparator,#8])then
begin
Key := #0;
MessageBeep (MB_OK);
end;
А этот код, пишет ошибку.
Не нравиться DecimalSeparator |
В операторе
in нельзя использовать переменные - только константы. А DecimalSeparator - это переменная.