Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.20;
Скачать: 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 вся ветка

Текущий архив: 2004.01.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.035 c
1-63233
Zeon
2004-01-05 00:36
2004.01.20
Проги под Linux


3-63008
Serge
2003-12-22 18:25
2004.01.20
End of SELECT statement expected, instead found . ??????


1-63224
Dantis
2004-01-09 12:11
2004.01.20
Linux Unix


14-63350
Pat
2003-12-30 01:48
2004.01.20
Программа просмотра сетевых пакетов


4-63431
Magical
2003-10-25 23:21
2004.01.20
Как эмулировать нажатие ctrl-alt-dl