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

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

← →
Moiseev-KN ©   (2004-11-17 16:05) [0]

Процедура сохранения выглядит следующим образом:
begin
   IBDataSet2.Insert;
   IBDataSet2OLD_COST.AsCurrency := StrToCurr(LabeledEdit7.Text);
   IBDataSet2.Post;
   IBTransaction2.CommitRetaining;
end;
в базу попадает нулевое значение, хотя в программе до поста значение присваивается верное...

---

← →
Johnmen ©   (2004-11-17 16:24) [1]

Пиши AsFloat.

---

← →
Rule ©   (2004-11-17 16:31) [2]

А ты почитай какие типы данных есть в интербейзе ...

---

← →
Moiseev-KN ©   (2004-11-17 16:32) [3]

> Johnmen ©   (17.11.04 16:24) [1]
> Пиши AsFloat.

Пробовал, та-же хрень, обошел это созданием хронимой процедуры которая и инсертит правильные значения...
Но все-же интересно почему не дает записать обычным способом.
Пробовал через IBX и через FIBPlus.
Надо будет на досуге (когда только он будет...) разобраться.

---

← →
Johnmen ©   (2004-11-17 16:35) [4]

>Moiseev-KN ©   (17.11.04 16:32) [3]
>та-же хрень

Не верю...:)

Как пробовал ? Код.

---

← →
Moiseev-KN ©   (2004-11-17 16:40) [5]

> Johnmen ©   (17.11.04 16:35) [4]
> >Moiseev-KN ©   (17.11.04 16:32) [3]
> >та-же хрень
>
> Не верю...:)
>
> Как пробовал ? Код.

begin
  IBDataSet2.Insert;
  IBDataSet2OLD_COST.AsFloat := StrToFloat(LabeledEdit7.Text);
  IBDataSet2.Post;
  IBTransaction2.CommitRetaining;
end;
В базе тип поля ставим Float...

---

← →
Johnmen ©   (2004-11-17 16:45) [6]

А в наборе данных поле IBDataSet2OLD_COST какого типа ?

---

← →
Moiseev-KN ©   (2004-11-17 16:46) [7]

IBDataSet2OLD_COST: TFloatField;

---

← →
Johnmen ©   (2004-11-17 16:47) [8]

Как выглядит InsertSQL ?

---

← →
Rule ©   (2004-11-18 08:53) [9]

Johnmen ©   (17.11.04 16:47) [8]
вот тут автор осознал свою ошибку и наверное не захотел дальше продолжать ветку, а жаль :(

---

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

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



Память: 0.46 MB
Время: 0.026 c