Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Отображение чисел с плавающей запятой в DBGrid-е [D7, IB6.x]

LittleGirly © (2004-05-17 09:44:00)
Каким образом можно задать и применить процедуру "форматирования" чисел с плавающей запятой в DBGrid-e, есть ли возможность использовать некий шаблон, типа ####.##
Привет всем девчонкам!

MIKE kouzmine (2004-05-17 12:33:00) [1]
Silver Alex © (17.05.04 12:03) [17] Как говорил один умный бюрократ "Лишняя справка никогда не бывает лишней", так и в программировании.

Соловьев (2004-05-17 12:23:00) [2]
время покажет

Silver Alex (2004-05-17 12:03:00) [3]

> Соловьев © (17.05.04 11:52) [15]

ну ты настырный :)
не надо здесь ничего проверять, у кого угодно спроси про конкретно эту задачу, но если так хочется то конечно можно и проверять.Но именно в данной ситуации этот шаг лишний

Johnmen (2004-05-17 11:58:00) [4]
>Ну не правы вы, парни, не хотите просто признать.

Призн аемся во всем. Если скажешь, в чём не правы.

Соловьев (2004-05-17 11:52:00) [5]

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

это все конечно все хорошо.
Но по всем правилам использования RTTI - екхземпляр надо проверить на принадлежность к нужному классу.

Silver Alex (2004-05-17 11:48:00) [6]
конечно можно использовать название самого поля, но в данном случае нет разницы, а так как я например привык такие обработчики вешать на несколько полей, потому так и пишу.А насчет ексепшена "потенциально приводящего к исключению..." , ну ты программер или нет, тут же надо уже по смыслу смотреть чего куда подставляешь.Ну не правы вы, парни, не хотите просто признать.

MIKE kouzmine (2004-05-17 11:38:00) [7]
Silver Alex © (17.05.04 11:35) [11] То есть может быть эксепшн? Может (сам ответил). А значит "потенциально приводящий к исключению..."

Соловьев (2004-05-17 11:37:00) [8]

> конечно если это поле String вывалится ексепшен, но это
> уже надо быть полным ламером

тогда зачем тебе Sender? ну и используй себе название поля.

Silver Alex (2004-05-17 11:35:00) [9]

> Соловьев © (17.05.04 11:29) [10]

вы чего пацаны ,на приколе что ли?ты что заведомо не знаешь на какое поле обработчик вешаешь?конечно если это поле String вывалится ексепшен, но это уже надо быть полным ламером.Ты сам про RTTI почитай, а заодно посмотри или только поле TNumericField может быть числом с плавающей точкой.Вот вы двоешники :)

Соловьев (2004-05-17 11:29:00) [10]

> [9] Silver Alex © (17.05.04 11:27)

почитай про RTTI
Поставь перед этим условие
if Sender is TNumericField then....

Silver Alex (2004-05-17 11:27:00) [11]
ну и каким образом?в каком именно случае?не может здесь быть исключения ни как.Вот если бы было написано sender.value>1000 и значение вдруг вернуло nil или empty,то тогда так как это variant, тут было бы исключение.А так в любом случае будет или 0, или число.Сам подумай хорошенько, или протестируй хорошо

Johnmen (2004-05-17 11:12:00) [12]
>Silver Alex © (17.05.04 10:51) [7]
>шутишь что ли, покажи где тут может быть исключение

Здесь - if sender.AsFloat>1000 then

Silver Alex (2004-05-17 10:51:00) [13]

> Johnmen © (17.05.04 10:12) [5]

шутишь что ли, покажи где тут может быть исключение

Соловьев (2004-05-17 10:19:00) [14]
TNumericField.DisplayFormat

Johnmen (2004-05-17 10:12:00) [15]
>Silver Alex © (17.05.04 10:10) [4]

Клд, потенциально приводящий к исключению...

Silver Alex (2004-05-17 10:10:00) [16]
а еще можно на событие поля OnGetText показывать чего угодно

procedure TForm1.ADODataSet1MatIDGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
if sender.AsFloat>1000 then
Text:=FormatFloat(',0.00',Sender.AsFloat) +' - ого-го'
else
Text:=FormatFloat(',0.00',Sender.AsFloat) +' - так себе';
end;

LittleGirly (2004-05-17 10:03:00) [17]
Ура, бегу проверять!

Johnmen (2004-05-17 09:57:00) [18]
Привет ! От мальчишек.
См. DisplayFormat у TField

MIKE kouzmine (2004-05-17 09:56:00) [19]
DisplayFormat TField.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »