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

арифметика с данными из БД   Найти похожие ветки 

← →
Trad   (2003-12-22 21:40) [0]

парни, как на правильном дельфийском языке надо писать строку, смысл которой заключён в следущей строчке:
DBText3.text:=(DBEdit5.text/DBText1*12);

---

← →
panov ©   (2003-12-22 22:36) [1]

DBText3.DataField.Value :=(DBEdit5.DataField.Value/DBText1.DataField.Value*12);

Получаем ошибку, а дальше разбираемся, где что исправлять...

---

← →
Trad   (2003-12-22 22:52) [2]

ошибка исчезла при
Form1.DBText3.DataField.Value :=(Form1.DBEdit5.DataField.Value/Form1.DBText1.DataField.Value*12);
но зато появилась новая:
[Error] Unit1.pas(481): Record, object or class type required
[Error] Unit1.pas(481): Record, object or class type required
[Error] Unit1.pas(481): Record, object or class type required
что за она?

---

← →
panov ©   (2003-12-22 23:04) [3]

Правильный подход не такой.

DBText связан с конкретным поле в таблице, т.е. с каким-то TDataSet, например, TQuery или TTable.

Использовать надо их, а не TDBEdit и TDBText.

Если изменять запии в таблице не нужно, тогда для отображения используй например TLabel.

В итоге строка твоя примет, например, такой вид:

Label1.Caption := FormatFloat("0.00",Form1.DBEdit5.DataSource.Dataset.FieldValues[Form1.DBEdit5.DataField]/Form1.DBEdit5.DataSource.Datase t.FieldValues[Form1.DBText1.DataField]*12);

-)

А проще обратиться напрямую к TDataset...

---

← →
kaif ©   (2003-12-23 00:07) [4]

Абзац полный

---

← →
Trad   (2003-12-23 00:24) [5]

>А проще обратиться напрямую к TDataset...

как?

---

← →
Кщд   (2003-12-23 05:48) [6]

kaif © (23.12.03 00:07) [4]
не абзац, а то, что Вы подумали :)

---

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

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



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