ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Listview e grid

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Mobile com Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
bladexp
Novato
Novato


Registrado: Quarta-Feira, 30 de Agosto de 2017
Mensagens: 1

MensagemEnviada: Sáb Set 22, 2018 12:49 pm    Assunto: Listview e grid Responder com Citação

Bom Tarde!

Sou iniciante no mundo do mobile e preciso que alguém me ajude na seguinte situação:

Tenho duas querys uma puxa a venda em si e a outra os itens.

Eu consigo listar as vendas no listview, mas gostaria que quando selecionasse uma venda mandasse para outra tela(tabcontrol) todos os itens apenas dessa venda, pode ser em outra listview ou mesmo listar todos em uma grid.

Podem me ajudar?

Obrigado pela atenção.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Missias
Aprendiz
Aprendiz


Registrado: Terça-Feira, 24 de Mai de 2005
Mensagens: 109

MensagemEnviada: Qua Out 10, 2018 1:50 pm    Assunto: Listview e grid Responder com Citação

procedure TfrmProjColihNI.ListView2ItemClick(const Sender: TObject;
const AItem: TListViewItem);
begin
dmColihNI.cdsMbHosp.Close;
dmColihNI.cdsMbHosp.Params.ParamValues['hp']:=dmColihNI.cdsAgendadosGeralCODIGOH.AsInteger;
dmColihNI.cdsMbHosp.Open;
TabControl1.TabIndex:=3;
dmColihNI.cdsMbHosp.First;
while dmColihNI.cdsMbHosp.Eof=false do
begin
Label5.Text:=dmColihNI.cdsMbHospNOME.AsString;
dmColihNI.cdsMbHosp.Next;
Label6.Text:=dmColihNI.cdsMbHospNOME.AsString;
dmColihNI.cdsMbHosp.Next;

end;
TabItem2.Visible:=true;
dmColihNI.cdsRelatorioAgen.Close;
dmColihNI.cdsRelatorioAgen.Params.ParamValues['hp']:= dmColihNI.cdsAgendadosGeralCODIGOH.AsInteger;
dmColihNI.cdsRelatorioAgen.Open;
Memo1.Text:='';
TabControl1.TabIndex:=3;
TabItem2.Visible:=true;
end;

Aqui eu tenho um tabcontrol e nele alguns tabitens, no evento onItenClick do listView1 dque está no tabiten1 eu coloquei o codigo acima, assim eu uso como parametro o iten selecionado na ListView1 para colocar no parametro do Sql para o Listview2, possiciono o Tabcontrol no Tabitem que está a nova ListVew2 e assim tenho os dados da escolha na primeira Listview. Não sou bom em explicar. mas se houver duvidas posta ai que tento explicar melhor.

Espero ter ajudado!!
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Mobile com Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB