GARANTIR DESCONTO

Fórum Manipular resuldado de consulta SQL #175179

15/08/2003

0

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

Responder

Posts

15/08/2003

Motta

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;


Responder

Gostei + 0

15/08/2003

Abueno_silva

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


Responder

Gostei + 0

15/08/2003

Brunomancuso

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?


Responder

Gostei + 0

15/08/2003

Abueno_silva

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]


Responder

Gostei + 0

15/08/2003

Brunomancuso

Obrigado a todos....
agora deu certinho


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar