Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.10;
Скачать: CL | DM;

Вниз

Вещественное число   Найти похожие ветки 

 
Ag2002   (2003-01-16 16:49) [0]

Подскажите пожалуйста как сделать так чтобы при вводе вещественого числа в компоненте DBEdit при нажатии на "ТОЧКУ" к значению поля добавляся разделитель вещественног числа т.е. запятая (зависит от настроек винды). Но при отображении этого числа в ГРИде нужно чтобы показывалась вместо запятой точка !!!
Пробывал маску ###.# непомогло обробочик события GetText и в нём AnsiReplaceStr(text,",","."); ничего не помогло как быть ?


 
Delirium^.Tremens ©   (2003-01-16 17:20) [1]

TField.DisplayFormat


 
Ag2002   (2003-01-16 17:27) [2]

TField.DisplayFormat - это тоже не то !!!!


 
Delirium^.Tremens ©   (2003-01-16 17:40) [3]

>>Ag2002 (16.01.03 17:27)

> TField.DisplayFormat - это тоже не то !!!!

Почему это?


 
TTCustomDelphiMaster ©   (2003-01-16 18:21) [4]

TField.OnGetText
TDBGrid.OnDrawXXXXCell
CalcFields


 
Ag2002   (2003-01-20 11:51) [5]

TField.DisplayFormat я там пишу ###.# - всё равно запятая отображается !!!


 
app ©   (2003-01-20 11:56) [6]

А как же иначе, ведь ты объяняешь системк - использовать 3 до 1 после и использовать текущие настройки


 
Reindeer Moss Eater   (2003-01-20 11:58) [7]

Подскажите пожалуйста как сделать так чтобы при вводе вещественого числа в компоненте DBEdit при нажатии на "ТОЧКУ" к значению поля добавляся разделитель вещественног числа
if (<Введена_Точка_или_Запятая>) and (<То_что_введено> <> DecimalSeparator) then
То_Что_Введено:=DecimalSeparator;


 
Ag2002   (2003-01-24 12:14) [8]

app © а как по другому "обяснить" ?


 
Anatoly Podgoretsky ©   (2003-01-24 12:29) [9]

Не объяснять, а самому формировать текст, правда желание у э немного странное, но раз нужно, то делай.


 
MsGuns ©   (2003-01-24 12:36) [10]

Для DBEdit:

OnChange
OnKeyPress

Для DBGrid:
OnGetText



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

Текущий архив: 2003.02.10;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.023 c
8-28948
DDS
2002-10-28 10:52
2003.02.10
Полупрозрачность?


3-28604
РВА
2003-01-22 15:05
2003.02.10
DBTreeview


1-28704
MixerPro
2003-01-30 17:12
2003.02.10
Поиск в TreeView


1-28748
Sentinel
2003-01-31 23:48
2003.02.10
ShlObj.SHGetPathFromIDList - обратное преобразование.


3-28588
AndrewVolkov
2003-01-23 18:14
2003.02.10
MS SQL 2000 + MSSQL 2000