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

Проблемы с составлением SQL запроса в котором числа Float ...   Найти похожие ветки 

← →
Step[B.M.] ©   (2002-11-12 12:34) [0]

Разделение челой от дробной части в Grid-e производится символом "," . При составленни IB SQL запроса - разделение челой от дробной части должно быть записано через ".". Приходится переключать в "Региональных настройках" Decimal Symbol с "," в "." Для чего так извращаться надо - не спрашивайте. Просто надо... Из ситуации в принципе вышел без проблем ... пример дан ниже. Но меня интересуют другие мнения. Может кто знает как сделать лучше, а может ответ вооще прост до безобразия.

procedure TForm1.Button1Click(Sender: TObject);
begin
IBQuery.SQL.Text:= ... PARAM="DecDecode(RxTbl1.Fields[0].AsString)";
end;

function TForm1.DecDecode(S: String): String;
var ss,st:string;
i:integer;
begin
ss:="";
for i:=1 to Length(s) do begin
st:=copy(s,i,1);
if (st=",") then st:=".";
ss:=ss+st;
end;
Result:=ss;
end;

---

← →
exit   (2002-11-12 12:44) [1]

в TFormOnCreate:

DecimalSeparator := ".";

или

DecimalSeparator := ",";


---

← →
Reindeer Moss Eater   (2002-11-12 12:46) [2]

При составленни IB SQL запроса надо использовать параметры, а не париться с разделителями

---

← →
Step[B.M.] ©   (2002-11-12 12:58) [3]

СпасибО! Все работает.

---

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

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



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