Manipular resuldado de consulta SQL

Delphi

15/08/2003

Pessoal,

Sou iniciante em delphi e estou com um problema, preciso fazer uma consulta SQL(mysql) e jogar em um campo no delphi, mas nao estou conseguindo...
segue abaixo o codigo.

ConexaoBanco.SQLQuery1.Active := False;
ConexaoBanco.SQLQuery1.SQL.Clear;
ConexaoBanco.SQLQuery1.SQL.Add(´select MAX(codigo) from clientes´);
ConexaoBanco.SQLQuery1.ExecSQL;
ConexaoBanco.SQLQuery1.AsString := codigo.Text;


[Error] CadastroClientes.pas(56): Undeclared identifier: ´AsString´

Valeuz


Brunomancuso

Brunomancuso

Curtidas 0

Respostas

Motta

Motta

15/08/2003

ConexaoBanco.SQLQuery1.Close;
ConexaoBanco.SQLQuery1.SQL.Clear;
ConexaoBanco.SQLQuery1.SQL.Add(´select MAX(codigo) from clientes´);
ConexaoBanco.SQLQuery1.Open;
Edit1.Text := ConexaoBanco.SQLQuery1.Fields[0].AsString;


GOSTEI 0
Abueno_silva

Abueno_silva

15/08/2003

Apenas complementando a resposta do Motta, Fields[[i:651720f825]0[/i:651720f825]] deve ser substituído pelo campo que você deseja colocar no Edit (0 para o primeiro, 1 para o segundo, etc). Se preferir, pode usar também o FieldByName([i:651720f825]nome_do_campo[/i:651720f825]).
[]´s


GOSTEI 0
Brunomancuso

Brunomancuso

15/08/2003

Eu consegui fazer quase o que eu queria, o unico problema é que eu nao consigo acrescentar uma soma ao campo(numerico), voces sabem como devo proceder?


GOSTEI 0
Abueno_silva

Abueno_silva

15/08/2003

Edit1.Text := inttostr(ConexaoBanco.SQLQuery1.Fields[0].AsInteger + [i:4d1d7c3bec]número[/i:4d1d7c3bec]); [i:4d1d7c3bec]// para campo inteiro[/i:4d1d7c3bec]

Edit1.Text := floattostr(ConexaoBanco.SQLQuery1.Fields[0].AsFloat + [i:4d1d7c3bec]número[/i:4d1d7c3bec]); // [i:4d1d7c3bec]para campo float[/i:4d1d7c3bec]


GOSTEI 0
Brunomancuso

Brunomancuso

15/08/2003

Obrigado a todos....
agora deu certinho


GOSTEI 0
POSTAR