Форум: "Начинающим";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];
Вниз
Ерунда какая-то с числами Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.049 c
