Главная страница
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.048 c
2-1141672750
mrAndersen
2006-03-06 22:19
2006.03.26
Текст


2-1141756772
Dmitrij_K
2006-03-07 21:39
2006.03.26
Непонятки с регистром символов в коде


2-1142067592
kkostik
2006-03-11 11:59
2006.03.26
Определить имя устройства!


2-1142006515
Vitalik__
2006-03-10 19:01
2006.03.26
работа с буфером.


2-1142240964
mrAndersen
2006-03-13 12:09
2006.03.26
Как добавить *.gif файл на форму?