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

Вниз

Десятичные разряды.   Найти похожие ветки 

 
Pertovsky   (2004-11-10 13:28) [0]

Мне нужно, чтобы в поле высвечивалось число с 6 (шестью) знаками после запятой. И хотя в БД все в порядке, в приложении и в гриде, и  в DBEdit - только 4.  В БД тип поля - Decimal (Precision = 12, Scale = 6). В ADODataSet тип поля - TBCDField (Precision = 12, Size = 6).
Как добиться отображения шести разрядов?


 
Mike Kouzmine ©   (2004-11-10 13:29) [1]

Может маска поможет?


 
Pertovsky   (2004-11-10 13:34) [2]

Не помогает. Пробовал.


 
Pertovsky   (2004-11-11 11:44) [3]

Неужели такой неактуальный вопрос? И никто не сталкивался с такой проблемой?
Тогда объясните, пожалуйста еще и такой факт: почему два поля одного типа в одной таблице БД (MS SQL - decimal), в Delphi (ADODataSet) имеют разный тип - одно TBCDField, а другое - TFloatField?


 
paul_k ©   (2004-11-11 13:28) [4]

а "код в студию"?
привести структуру таблицы, пример данных и так далее?


 
Johnmen ©   (2004-11-11 13:31) [5]

>Тогда объясните, пожалуйста еще и такой факт: почему два поля
>одного типа в одной таблице БД (MS SQL - decimal), в Delphi
>(ADODataSet) имеют разный тип - одно TBCDField, а другое -
>TFloatField?

Потому, что их "размерности" разные...


 
sniknik ©   (2004-11-11 14:01) [6]

кстати BCD поля могут конвертироваться в тип каренси (или в промежуточной конвертации этот тип использоваться) тогда после запятой максимум 4 знака будет (как в типе описано).
ситуацию когда такое может быть не помню, помню только было такое. надо перепроверять.
(включи отладку в модулях, в опциях проэкта compiler "use debug dcu" и пройдись по F7 по "темным" местам)


 
Ega23 ©   (2004-11-11 14:20) [7]

procedure TFMain.Button1Click(Sender: TObject);
var
ss:string;
begin
ss:="Select X=Cast(GetDate() as Float)";
RQTemp.SQL.Text:=ss;
RQTemp.Open;
Str(RQTemp.FieldByName("X").AsFloat:12:6,ss);
ShowMessage(ss);
end;


Всё прекрасно работает...


 
sniknik ©   (2004-11-11 14:52) [8]

> Всё прекрасно работает...
а так попробуй
RQTemp.SQL.Text:= "Select X=Cast(GetDate() as DECIMAL(12,6))"

?
вот так оно конечно срабатывает
SELECT Cast(CAST(GetDate() AS DECIMAL(12,6)) AS  Char(20))
6 знаков показывает, но это же на стороне сервера... а вот если придет в формате десимал...



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

Форум: "Базы";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.041 c
1-1101515434
Sirakuz
2004-11-27 03:30
2004.12.12
Delphi 8: TBytes ??


14-1100948044
Progh
2004-11-20 13:54
2004.12.12
Подскажите ХОРОШУЮ статью перехвата WIN API с примерами на Delphi


3-1100155505
newby
2004-11-11 09:45
2004.12.12
Округление в футере EHLib DBGrid


14-1101213427
pasha_golub
2004-11-23 15:37
2004.12.12
МВД: Человеческие качества


1-1101366227
Denmin
2004-11-25 10:03
2004.12.12
Как передать фокус из DBEdit на SpeedButton, из DBMemo в DBEdit ?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский