| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблемы с составлением SQL запроса в котором числа Float ... [D5, IB6.x]
Step[B.M.] © (2002-11-12 12:34:00)Разделение челой от дробной части в 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;
Step[B.M.] (2002-11-12 12:58:00) [1]СпасибО! Все работает.
Reindeer Moss Eater (2002-11-12 12:46:00) [2]При составленни IB SQL запроса надо использовать параметры, а не париться с разделителями
exit (2002-11-12 12:44:00) [3]в TFormOnCreate:
DecimalSeparator := ".";
или
DecimalSeparator := ",";
| |
