| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
meidasmi
Aprendiz
Registrado: Sexta-Feira, 22 de Setembro de 2006
Mensagens: 227
|
 Enviada: Seg Dez 11, 2006 4:00 pm Assunto: listbox |
 |
|
Alguem tem como me ajudar
uso firebird com a conexao expless!
estou fazendo um programa para mercado
e nao consigo passar os obejetos cadastrado no banco
para o lixtbox para fazer a impressao posterior |
|
| Voltar ao Topo |
|
 |
meidasmi
Aprendiz
Registrado: Sexta-Feira, 22 de Setembro de 2006
Mensagens: 227
|
| Enviada: Seg Dez 11, 2006 4:28 pm Assunto: alguem me ajuda ou nem???? |
|
|
| alguem me ajuda ou nem???? |
|
| Voltar ao Topo |
|
|
meidasmi
Aprendiz
Registrado: Sexta-Feira, 22 de Setembro de 2006
Mensagens: 227
|
| Enviada: Seg Dez 11, 2006 4:35 pm Assunto: up |
|
|
poxa pessoal
me ajudem aee por favor???? |
|
| Voltar ao Topo |
|
|
gustavocco
Administrador
Registrado: Sexta-Feira, 6 de Fevereiro de 2004
Mensagens: 4253
Localização: Chapecó - SC
|
| Enviada: Seg Dez 11, 2006 5:21 pm Assunto: |
|
|
Olá, tentou utilizar um DBListBox???
Se vc quiser adicionar os dados de um campo do seu db por exemplo, seria soh vc percorrer a tabela em questao e adicionar no listbox.
| Código: |
seulistbox.clear;
Cds.First;
while not cds.eof do begin
seulistbox.items.add('Listando: '+cds.FieldByName('SEUCAMPO').AsString);
cds.next;
end;
|
qqr coisa posta mais detalhes ai.
Flw. |
|
| Voltar ao Topo |
|
|
meidasmi
Aprendiz
Registrado: Sexta-Feira, 22 de Setembro de 2006
Mensagens: 227
|
| Enviada: Ter Dez 12, 2006 10:08 am Assunto: |
|
|
Obrigado gustavo
keria na verdade add itens da tabela
e no final me trazer o total do valor dos itens
e coisas assim
abrigado novamente |
|
| Voltar ao Topo |
|
|
gustavocco
Administrador
Registrado: Sexta-Feira, 6 de Fevereiro de 2004
Mensagens: 4253
Localização: Chapecó - SC
|
| Enviada: Ter Dez 12, 2006 10:27 am Assunto: |
|
|
Hmmm poseh acima vc tem a forma de adicionar os valores da tabela, para trazer o total no final eh soh vc criar uma var q acumula os valores de cada registro, e jogar no final ...
qqr coisa mandai.
Flw. |
|
| Voltar ao Topo |
|
|
johnny-walker
Moderador
Registrado: Sábado, 4 de Outubro de 2003
Mensagens: 10653
Localização: Contagem/MG - BRAZIL
|
| Enviada: Seg Jan 08, 2007 11:47 pm Assunto: |
|
|
Desculpe por prolongar o post pessoal...
Olá amigo... acredito que vc possa utilizar um componente dblookuplistbox configurados assim:
KeyField = 'Campo'
ListField = 'Campo'
ListSource = DataSource1
quando vc adiciona o datasource aparece um sinal de + de uma olhada e escolha o table ou componente de acesso a dados correspondente...
bye... |
|
| Voltar ao Topo |
|
|
adriano_servitec
Colaborador
Registrado: Sexta-Feira, 30 de Janeiro de 2004
Mensagens: 17618
|
| Enviada: Ter Jan 09, 2007 9:03 am Assunto: |
|
|
| meidasmi escreveu: | Obrigado gustavo
keria na verdade add itens da tabela
e no final me trazer o total do valor dos itens
e coisas assim
abrigado novamente |
Olah amigo serah que eh isso que vc precisa para o total?
| Código: | procedure TFVBalcao.ButTotalClick(Sender: TObject);
var I :Integer;
R : real;
begin
R := 0;
For I:= 0 to ListBox1.Items.Count -1 do
R := R + strtofloat(StringReplace(ListBox1.Items.Strings[I],'.','',[rfReplaceAll]));
editTotal.Text := FormatFloat('#,##0.00;(#,##0.00)',r);
Memo1.Lines.Add('________________________________');
Memo1.Lines.Add('Total.......................>'+' ' + editTotal.text);
end; |
_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree |
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
