Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.07.14;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

Форум: "Основная";
Текущий архив: 2003.07.14;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.008 c
1-44759
Big
2003-07-01 17:12
2003.07.14
Сервис (служба) на Delphi


7-44932
velsi
2003-04-29 16:53
2003.07.14
hide and shutdown


3-44570
DevMaster
2003-06-20 12:09
2003.07.14
dxMasterView


1-44734
MARcoDEN
2003-06-30 13:00
2003.07.14
Координаты пункта меню


1-44645
Dream
2003-07-02 11:43
2003.07.14
Как сделать активным одну из вкладок PageControl ?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский