арифметика с данными из БД

← →
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]

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