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

Вниз

Ерунда какая-то с числами   Найти похожие ветки 

 
11111   (2006-03-09 16:21) [0]

В таблице Oracle забиты числа
.1
.02
.01
.002
.001
.0002
.0001
.00003

Этими числами заполняется listBox в Delphi. Первые 7 чисел нормально заполняются, а последняя всегда почему то превращается в 0.

Столбец в который заполняются числа создан как number(20,12)


 
Reindeer Moss Eater ©   (2006-03-09 16:28) [1]

Листбокс не может заполняться числами


 
11111   (2006-03-09 16:34) [2]

Код заполнения ListBox

Выборка значений:
ADOQuery5.Close;
ADOQuery5.SQL.Clear;
ADOQuery5.SQL.Add("select *");
ADOQuery5.SQL.Add("from Ugol_Rash");
ADOQuery5.Open;

Вставка в ListBox
 for n:=0 to ADOQuery5.RecordCount-1 do
 begin
 ListBox1.Items.Add(FormatFloat("0.######",ADOQuery5.FieldByName("Ugol_Rash").AsF loat));
 ADOQuery5.RecNo:=ADOQuery5.RecNo+1;
 end;

В принципе
ShowMessage(ADOQuery5.FieldByName("Ugol_Rash").AsString);
вместо .00003 показывает 0


 
Reindeer Moss Eater ©   (2006-03-09 16:40) [3]

Ну и при чем здесь числа и Оракл?

procedure TForm1.Button1Click(Sender: TObject);
begin
Caption := Format("%18.5f",[0.00003]);
end;


 
Reindeer Moss Eater ©   (2006-03-09 17:03) [4]

Либо преобразовывать прямо на сервере:
"select to_char(Ugol_Rash,"99.99999") from Ugol_Rash"



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

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

Наверх




Память: 0.47 MB
Время: 0.077 c
2-1141542433
Silica
2006-03-05 10:07
2006.03.26
Написанную в паскале....


2-1142177966
Viewer
2006-03-12 18:39
2006.03.26
Полный путь до консольного приложения?


2-1141937403
redlord
2006-03-09 23:50
2006.03.26
Аттрибуты файла


6-1134505291
(CHALING 32)S K i N E R
2005-12-13 23:21
2006.03.26
Сетевой чат!(Локальный)


6-1134327682
ZeFiR
2005-12-11 22:01
2006.03.26
Собственные страницы ошибок в TWebBrowser