Interbase x IBDataSet delphi7
Bom dia pra todos,
Estou com problemas em usar parametros dentro das instruçoes SelectSQL, ModificSQL e InsertSQL:
Ex:
select count(IDCOD) as :TOT_IDCOD from CLIENTES
função ´count´ dentro da ´select´ me retorno número de registros encontrados pela função ´select´ e carrega este valor no parametro TOT_IDCOD.
O problema é quando executo um código do tipo:
Ex:
var
Tot_Cli: integer;
begin
Tot_Cli := dm.IBDataSet1.ParamByName(´TOT_IDCOD´).AsInteger;
//ou
Tot_Cli := dm.IBDataSet1.FieldByName(´TOT_IDCOD´).AsInteger;
end;
Dá a mensagem de erro que o Field não exist.
Alguém sabe oque eu estou fazendo de errado?
André :?:
Estou com problemas em usar parametros dentro das instruçoes SelectSQL, ModificSQL e InsertSQL:
Ex:
select count(IDCOD) as :TOT_IDCOD from CLIENTES
função ´count´ dentro da ´select´ me retorno número de registros encontrados pela função ´select´ e carrega este valor no parametro TOT_IDCOD.
O problema é quando executo um código do tipo:
Ex:
var
Tot_Cli: integer;
begin
Tot_Cli := dm.IBDataSet1.ParamByName(´TOT_IDCOD´).AsInteger;
//ou
Tot_Cli := dm.IBDataSet1.FieldByName(´TOT_IDCOD´).AsInteger;
end;
Dá a mensagem de erro que o Field não exist.
Alguém sabe oque eu estou fazendo de errado?
André :?:
Andre_ipb
Curtidas 0
Respostas
Afarias
05/12/2003
o correto seria::
1) um select como::
select count(IDCOD) as TOT_IDCOD from CLIENTES
// sem os dois-pontos no TOT_IDCOD
Tot_Cli := dm.IBDataSet1.FieldByName(´TOT_IDCOD´).AsInteger;
ou::
2) um select como::
select count(IDCOD) from CLIENTES
Tot_Cli := dm.IBDataSet1.Fields[0].AsInteger;
T+
1) um select como::
select count(IDCOD) as TOT_IDCOD from CLIENTES
// sem os dois-pontos no TOT_IDCOD
Tot_Cli := dm.IBDataSet1.FieldByName(´TOT_IDCOD´).AsInteger;
ou::
2) um select como::
select count(IDCOD) from CLIENTES
Tot_Cli := dm.IBDataSet1.Fields[0].AsInteger;
T+
GOSTEI 0