[firebase-br] RES: RES: Sugestão de Componentes

Felix felix2005 em oi.com.br
Ter Ago 25 20:56:29 -03 2009


Você está falando:

DbEdit ligado a Query, mantendo a transação aberta?

Ou ligado a um TDataSet?


Fco. Felix
Desenvolvimento de Sistemas
www.soltecnologia.com.br

-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br] Em
nome de Carlos Wilson
Enviada em: terça-feira, 25 de agosto de 2009 18:11
Para: FireBase
Assunto: Re: [firebase-br] RES: Sugestão de Componentes

Usa DBEdit

Felix escreveu:
> Eu fiz o seguinte:
>
> 1. Coloco o nome dos TEdit´s conforme nome do campo:
> EdCodigo, EdNome ; EdEndereco ; EdBairro ; EdCidade ; EdUF
>
> 2. Criei uma rotina que ao ser acionada 'varre' o form a procura desses
> componentes e atribui automaticamente os valores, conforme já vem do
select:
>
> SQL.add('Select Nome, Endereco, Bairro, Cidade, UF from cadastro where
> Codigo = :xCodigo');
> .
> ...bla bla bla...
> .
> Carrega_campos;
>
> Proc Carrega.campos
> Var
>    _ii : integer;
> Begin
>    for _ii := 0 to Self.ComponentCount - 1 do
>    begin
>       //Edit
>       if (Self.Components[_ii].ClassName = 'TEdit')  and
> (UpperCase(Copy((Self.Components[_ii] as TEdit).Name,1,2))='ED')  then
>          (Self.Components[_ii] as TEdit ).Text := QLeitura.FieldByName(
> Copy((Self.Components[_ii] as TEdit ).Name,3,20) ).AsString;
>    end;
> end;
>
>
>
> Fco. Felix
> Desenvolvimento de Sistemas
> www.soltecnologia.com.br
>
>
> -----Mensagem original-----
> De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br]
Em
> nome de Moacir - GMail
> Enviada em: terça-feira, 25 de agosto de 2009 13:55
> Para: FireBase
> Assunto: Re: [firebase-br] Sugestão de Componentes
>
> Denilson,
>
> É simples:
>
> Zquery.Close;
> Zquery.SQL.Text:='select * from tabela";
> Zquery.Open;
>
> Edit1.Text := Zquery.FieldByName('NomeDoCampo').AsString;
>
> Sucesso !!
>
> Moacir
>
>
>
>
> Denilson Albuquerque escreveu:
>   
>> Estou começando, no dephi e só consigo inserir..
>> como eu "recupero" um campo e "jogo" num edit comum..
>>
>> usando o Zeos,
>>
>> Zquery.SQL.Add('select * from tabela");
>>
>> ... o resto nao sei..
>>
>> desculpa pela pergunta simples
>>
>>
>> 2009/8/25 Magno System <magnosysteminformatica em gmail.com>
>>
>>   
>>
>>     
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
>   


______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use:
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa





Mais detalhes sobre a lista de discussão lista