estados do dataset
Srs, estou implementando o codigo abaixo
[color=blue:5175ec5d8d]procedure TForm1.btalterarClick(Sender: TObject);
begin
if not dsclientes.State in [dsedit,dsinsert] then
dsclientes.dataset.edit;
form1.DBEdit2.SetFocus;
end;[/color:5175ec5d8d]
mas o delphi esta me retornando o seguinte erro:
[color=red:5175ec5d8d]´[Error] clientes.pas(107): Operator not applicable to this operand type´[/color:5175ec5d8d]
Algum de vcs poderiam me ajudar a resolver este erro. Estou usando sqlserver e a paleta ado com os seguintes componentes: AdoConnection e AdoDataset.
[color=blue:5175ec5d8d]procedure TForm1.btalterarClick(Sender: TObject);
begin
if not dsclientes.State in [dsedit,dsinsert] then
dsclientes.dataset.edit;
form1.DBEdit2.SetFocus;
end;[/color:5175ec5d8d]
mas o delphi esta me retornando o seguinte erro:
[color=red:5175ec5d8d]´[Error] clientes.pas(107): Operator not applicable to this operand type´[/color:5175ec5d8d]
Algum de vcs poderiam me ajudar a resolver este erro. Estou usando sqlserver e a paleta ado com os seguintes componentes: AdoConnection e AdoDataset.
Programalista
Curtidas 0
Melhor post
Fabio.hc
27/01/2004
O problema não é o not.
Tente assim;
Tente assim;
procedure TForm1.btalterarClick(Sender: TObject); begin if not (dsclientes.State in [dsedit,dsinsert]) then dsclientes.dataset.edit; form1.DBEdit2.SetFocus; end;
GOSTEI 1
Mais Respostas
Fabio.hc
27/01/2004
O problema é o not
if [b:4fb5a33d01]not[/b:4fb5a33d01] dsclientes.State in [dsedit,dsinsert] then
Tente assim:
if [b:4fb5a33d01]not[/b:4fb5a33d01] dsclientes.State in [dsedit,dsinsert] then
Tente assim:
procedure TForm1.btalterarClick(Sender: TObject); begin if dsclientes.State = dsbrowse then dsclientes.dataset.edit; form1.DBEdit2.SetFocus; end;
GOSTEI 0
Programalista
27/01/2004
Valeu Fábio!!! consegui implementar.
GOSTEI 0