Вниз
Скачать: CL | DM;

StringGrid + OnKeyPress   Найти похожие ветки 

 
Igorok ©   (2003-07-02 12:36) [0]

Привет всем!
Помогите решить проблему:

procedure TForm.StringGridKeyPress(Sender: TObject; var Key: Char);
begin
if Key = "." then Key := ",";

inherited; ---- Вопрос: как отработать данное событие?
т.к. отображается нажатая клавиша
только после End.

<проверка данных в ячейке>

end;


 
Skier ©   (2003-07-02 12:37) [1]

зачем inherited; ?

> т.к. отображается нажатая клавиша
> только после End.

Переведи...


 
Igorok ©   (2003-07-02 12:41) [2]

я хочу знать в этом событии сколько символов в ячейке введено, а пока это событие не отработает символ в ячейку не прописывается, мне надо как бы родителя этого события вызвать


 
Skier ©   (2003-07-02 12:43) [3]


> я хочу знать в этом событии сколько символов в ячейке введено,
> а пока это событие не отработает символ в ячейку не прописывается,
>

А при чём тут событие OnKeyPress ?
Без него никак... ?


 
Igorok ©   (2003-07-02 12:46) [4]

как тогда решить проблемму?


 
Skier ©   (2003-07-02 12:48) [5]

>Igorok © (02.07.03 12:46)

> как тогда решить проблемму?

Какую ? Подробнее...


 
Igorok ©   (2003-07-02 12:53) [6]

в ячейку грида я ввожу число (символы не допустимо) и это число должно быть не больше 99,99 и только два разряда после запятой (маской ввода не пользоваться)


 
Skier ©   (2003-07-02 12:59) [7]

TStringGrid.OnSetEditText ?


 
Igorok ©   (2003-07-02 13:17) [8]

нет этот вариант не пройдет, закручено получится


 
Skier ©   (2003-07-02 13:18) [9]


> закручено получится

То есть ?


 
Igorok ©   (2003-07-02 13:22) [10]

тогда примерчик реализации кода можно?


 
Skier ©   (2003-07-02 13:22) [11]

-"Вы что и есть за меня будите ?!"
-"Ага !"


 
Igorok ©   (2003-07-02 13:28) [12]

тогда к чему этот диалог???
А?


 
Skier ©   (2003-07-02 13:30) [13]

А к тому что я пытаюсь навести тебя (по мере своих сил)
на правильное (или более простое) решение проблемы, а ты
хочешь чтобы я ещё и код за тебя писал.


 
Igorok ©   (2003-07-02 13:45) [14]

Ок, спасибо



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

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



Память: 0.47 MB
Время: 0.013 c
4-44944
MW Programs
2003-05-13 16:37
2003.07.14
Message LBM_


1-44739
Валерий
2003-07-01 14:11
2003.07.14
Дата/время файла


6-44775
ErikIvanov
2003-05-02 16:34
2003.07.14
Как корректно оборвать соеденение в Indy TIdFTP.


14-44811
gfhjs
2003-06-29 12:37
2003.07.14
INI!


7-44916
ИгорьМ
2003-04-30 23:42
2003.07.14
Принтер




   Наверх