[firebase-br] Tem como atribuir resultado de um select a umavariavel do programa?

Rubem Nascimento da Rocha djpardalrocha em hotmail.com
Sáb Maio 27 10:44:06 -03 2006


1) Tua dúvida está relacionada mais com Delphi do que com FireBird. Merecia 
um OFF-TOPIC no campo assunto, não acha?

2) Respondendo tua dúvida ...

Ora, simples demais!

procedure TF_ContFluxo.Button1Click(Sender: TObject);
var
   Variavel:Integer;
begin
   F_Dtml.Cod_Sql.Sql.Clear;
   F_Dtml.Cod_Sql.SQL.add('Select max(Lau_Posicao) from Tb_Lau');
   F_Dtml.Cod_Sql.Open;   // tem que abrir pra poder ter o retorno, né?
   variavel := F_Dtml.Cod_Sql.SQL.Fields[0].AsInteger;
   F_Dtml.Cod_Sql.Close;   // depois, lógico, tem que fechar a consulta
end;


>From: "Claudir Pereira dos Santos" <claupers_dbrays em yahoo.com.br>
>Reply-To: FireBase <lista em firebase.com.br>
>To: Lista de discussão FireBase <lista em firebase.com.br>
>Subject: [firebase-br] Tem como atribuir resultado de um select a 
>umavariavel do programa?
>Date: Sat, 27 May 2006 10:34:21 -0300
>
>Pessoal,
>Tem como atribuir resultado de um select a uma variavel do programa desta 
>forma:
>
>procedure TF_ContFluxo.Button1Click(Sender: TObject);
>var
>   Variavel:Integer;
>begin
>   F_Dtml.Cod_Sql.Sql.Clear;
>   F_Dtml.Cod_Sql.SQL.add('Select max(Lau_Posicao) from Tb_Lau');
>  variavel:=O valor retornado pelo select
>  end;
>
>end.
>
>
>
>Desde já agradeço;
>______________________________________________
>FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
>Para editar sua configuração na lista, use o endereço 
>http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
>Para consultar mensagens antigas: http://firebase.com.br/pesquisa

_________________________________________________________________
MSN Messenger: converse com os seus amigos online. 
http://messenger.msn.com.br





Mais detalhes sobre a lista de discussão lista