Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.031 c