Не может Query.State=dsBrowse
вот кусок кода
//-------------------------------
if DM_Vater.Query_Select.State = dsbrowse then
begin
DM_Vater.qrSummAll.Close;
DM_Vater.qrSummAll.SQL.Text:='SELECT sum(Summa) FROM "produkt.DB"';
DM_Vater.qrSummAll.Open;
smLbAll.Caption:=FloatToStr(DM_Vater.qrSummAll.Fie lds[0].AsFloat);
smLbAll.Refresh;
DM_Vater.qrSummAll.Close;
end;
//-------------------------------
Delphi выдает ошибку на первой строке.
В ошибках пишет Undeclared identifier: 'dsbrowse'
Query_Select в режиме double (идет выборка по дате), как перевести в integer?
|