Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / DBGridEh / 9 сообщений из 9, страница 1 из 1
16.03.2003, 07:15:18
    #32120718
-Димон-
-Димон-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
Что это может быть?
На событие DataSet OneCalcFields
FieldByName('Rest').Value:=(FieldByName('Quantity').Value)-(FieldByName('SaleQuantity').Value);
Получается переполнение стека.Как сделать правильно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2003, 08:40:28
    #32120853
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
А поле Rest у тебя вычисляемое или нет?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.03.2003, 09:13:00
    #32120858
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
ЕСли это поле данных, и ты его модифицируешь на OnCalcFields, в ответ тебе снова генериться OnCalcFields и ты получаешь зацикливание, что в конце концов приводит к Stack Overflow.

Вот тока интересно, причем тут DBGridEH в теме топика?!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 00:38:57
    #32121623
-Димон-
-Димон-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
А поле Rest у тебя вычисляемое или нет?

Поле Rest хочу сделать вычисляемым:
FieldByName('Rest').Value:=(FieldByName('Quantity').Value)-(FieldByName('SaleQuantity').Value);Оно не виртуальное и находится в базе,может содержать значения.

Вот тока интересно, причем тут DBGridEH в теме топика?!

Чтоб было понятнее :)

Как теперь понимаю OnCalcFields событие не подходит.
Что можно сделать????????
Help me please!?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 08:17:29
    #32121660
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
Я спрашивал про вычисляемое поле в терминах TDataSet. А у тебя поле fkData, и делать с ним такое в обработчике OnCalcFields нельзя. Как можно сделать, если нужно вычисляемое поле хранить в базе. Из базы это поле можно не выбирать, раз оно расчитывается на основании значений других полей. Создай поле Rest, типа fkCalculated, в обработчике OnCalcFields пиши, что писал. И его сохраняй в базе.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 17:35:55
    #32122364
-Димон-
-Димон-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
Создай поле Rest, типа fkCalculated, в обработчике OnCalcFields пиши, что писал. И его сохраняй в базе.

Прошу меня простить за мою непонятливость.Но как сохраняются поля OnCalcFields?Это же виртуальные поля.Они видны только при работе приложения.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 18:19:11
    #32122403
pkarklin
pkarklin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
Я не знаю, через что ты работаешь. У меня есть два варианта проектов, одни на BDE, другие на ADO. Везде используются переработанные компоненты доступа к данным, в которых изменения данных сохраняются через инструкции UpdateSQL, InsertSQL и DeleteSQL (не люблю когда за меня ADO решает, какую инструкцию ему на сервер посылать) В которых, как обычно стоит параметр ...SET SomeField = :SomeCalculatedField... А его подствляем из DataSeta, и в данном случаи без разницы, какого оно типа fkData или fkCalculated.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.03.2003, 22:57:23
    #32122493
-Димон-
-Димон-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
А что делать в ADO?Компоненты UpdateSQL, InsertSQL и DeleteSQL к сожалению я не использую.Данные получаю через ClientDataSet.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.03.2003, 03:24:11
    #32122518
Dikobrazz
Dikobrazz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBGridEh
Лучше поставить в DataSource обработку на DataChange. Тогда значение этого поле будет пересчитываться при редактировании других полей.
Код: plaintext
1.
2.
3.
4.
5.
6.
procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
  if (Field<>nil) and (Field.FieldName<>'Rest') and (Field.DataSet.State in dsEditModes)
  then with Field.DataSet do
    FieldByName('Rest').Value := FieldByName('Quantity').Value - FieldByName('SaleQuantity').Value;
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / DBGridEh / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 495ms
Закрыть
start [/forum/topic.php?fid=58&tablet=1&tid=2118877]:
 0ms
get settings:
 7ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 4ms
track hit:
 204ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 208ms
total:  495ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]