странный глюк...

← →
Элина (2003-11-05 13:44) [0]

выполняю Table1.Active := TRUE, а мне в ответ исключение "Dataset is not in edit or Insert mode"
или я такая тупая или Дельфин

← →
bushmen © (2003-11-05 13:47) [1]

А поподробнее ?

← →
Элина (2003-11-05 13:52) [2]

if not Table.Active then
Table.Active := TRUE;
на этой строке Active = False соответственно пытаемся открыть таблицу и возникает исключение
"Dataset is not in edit or Insert mode"
Table.Open дает тот же результат

← →
DenK_vrtz © (2003-11-05 13:53) [3]

Что висит на событиях таблицы?

← →
Элина (2003-11-05 13:55) [4]

procedure TForm1.Query1CalcFields(DataSet: TDataSet);
var i, temp: LongInt;
begin
with base do
if tbCardCounter_R.Value>=tbCardCounter.Value then
tbCardRun.Value := (tbCardCounter_R.Value- tbCardCounter.Value)
else
begin
//Надо определить разрядность спидометра
temp := tbCardCounter.Value;
i := 0;
While Temp>0 do
begin
temp := temp div 10;
inc (i);
end;
i := round(exp ((i)*ln(10)))+tbCardCounter_R.Value;
tbCardRun.Value := i-tbCardCounter.Value;
end;
Query1Norm_R.Value := Query1Norm.Value*(Query1Run.Value/100);//расход по норме
Query1Rem.Value := Query1Charged.Value+Query1Remainder.Value-Query1Fact.AsInteger;//Остаток
Query1Eco.Value := Query1Norm_R.Value-Query1Fact.Value;
end;

← →
Элина (2003-11-05 14:00) [5]

сразу поясняю последние 4 строки - это вычисляемые поля

← →
Незнайка2003 (2003-11-05 14:02) [6]

Поможет отладчик

← →
Элина (2003-11-05 14:06) [7]

странный глюк... Найти похожие ветки