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

Вниз

теряется запятая при вставке числа в таблицу ...   Найти похожие ветки 

 
Tutov Roman   (2002-06-18 13:49) [0]

При отработке такого запроса в таблицу вставляется
число 1267 . Почему ?

UPDATE VIDKARD
set PRISE="12,67"
where VIDKARD = "UPS Powercom BNT 600-A"

Поле PRISE типа Float


 
matvey   (2002-06-18 14:00) [1]

При обработке такого запроса ничего не должно вставиться, потому как запятая воспринимается как разделитель. Нужно использовать "12.67".


 
Tutov Roman   (2002-06-18 14:14) [2]

Для вставки я использую такой код :

IBQuery1.Close;
Form1.IBQuery1.SQL.Add("UPDATE VIDKARD");
Form1.IBQuery1.SQL.Add("set PRISE="+Chr(39)+form1.Table1.FieldByName("TSENA").asString+Chr(39));
Form1.IBQuery1.SQL.Add("where VIDKARD ="+Chr(39)+form1.Table1.FieldByName("NAME").AsString+Chr(39));

Memo1.Text:=form1.Table1.FieldByName("TSENA").asString;
IBQuery1.Open;
IBQuery1.SQL.Clear;

Как тогда нужно обходить эту проблему ?


 
hooch   (2002-06-18 14:22) [3]

Form1.IBQuery1.SQL.Add("set PRISE=:PRISE");
Form1.IBQuery1.ParamByName("PRISE").Value = form1.Table1.FieldByName("TSENA").Value


 
Tutov Roman   (2002-06-18 14:46) [4]

Спасибо


 
Skywalker ©   (2002-06-18 14:54) [5]

Попробуй так:
DecimalSeparator:=".";
IBQuery1.Close;
Form1.IBQuery1.SQL.Add("UPDATE VIDKARD");
Form1.IBQuery1.SQL.Add("set PRISE="+Chr(39)+FloatToStrF(form1.Table1.FieldByName("TSENA").AsFloat,ffFixed,8,2)+Chr(39));
Form1.IBQuery1.SQL.Add("where VIDKARD ="+Chr(39)+form1.Table1.FieldByName("NAME").AsString+Chr(39));

Memo1.Text:=form1.Table1.FieldByName("TSENA").asString;
IBQuery1.Open;
IBQuery1.SQL.Clear;





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

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

Наверх




Память: 0.47 MB
Время: 0.009 c
1-47419
Gonschik
2002-07-03 06:53
2002.07.15
Доступ к памяти чужой программы


3-47168
Als
2002-06-19 09:22
2002.07.15
Блокировка записи


14-47671
lipskiy
2002-06-13 19:56
2002.07.15
UBPFD - бесплатная база готовых решений для Delphi


1-47350
Mike N. Radoman
2002-07-01 17:51
2002.07.15
Как получить разрешение принтера?


6-47646
KPV-10k
2002-05-03 22:08
2002.07.15
Управление занятым сокетом