Re: [delphi-br] Preencher uma Label com o Resultado da Query

Sat, 01 Apr 2006 01:50:34 -0800 

Jenifer:

Faça assim,

      IBQuery1.SQL.Clear;
      IBQuery1.SQL.Add('Select Sum(campo + campo2) as Tsoma from Tabela';
      IBQuery1.Prepare;
      IBQuery1.Open;

      lblTotal.Caption := FormatFloat('###,###,##0.00', 
IBQuery1.FieldByName('TSoma').AsCurrency);
 
      IBQuery1.Close;

[ ]´s
Moacir
 


Jenifer Arosa escreveu:
> Oi Gente.
>    
>   Sera que alguem pode me ajudar numa duvida basica.
>   Como faço para mostrar numa label o resultado de um Select?
>         IBQuery1.SQL.Clear;
>       IBQuery1.SQL.Add('Select Sum(campo + campo2) as Tsoma from Tabela';
>       IBQuery1.Prepare;
>       IBQuery1.Open;
>       IBQuery1.Close;
>
>       lblTotal.Caption := ?????????? FormatFloat('###,###,##0.00', TSoma );
>
> Grata Pela Ajuda
>    
>   Jenifer
>
>               
> ---------------------------------
>  Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no celular 
> e anti-spam realmente eficaz. 
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>   



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

Responder a