Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

osvaldo francisco pinto

Caption do Form programado conforme pessoa pesquisada

Recommended Posts

Boa tarde a todos

Preciso de ajuda no seguinte sentido, tenho um Form Principal chamado FrmCadCrim onde faço o cadastro da pessoa de interesse esse Form é ligado a TblCadCrim que se encontra no datamodule (dados) e essa tabela é relacionada a TblEndCrim através da chave estrangeira IdCrim, os dados desta segunda tabela são mostrados no Form FrmCadEnd, o qual é chamado no Form principal através de um botão, gostaria que ao abrir o FrmCadEnd em sua caption fosse exibido o nome do formulário (Pesquisa pelo apelido - Endereços) mais o nome da pessoa cadastrada na TblCadCrim, isso seria possível? e como deverei fazer?

Para melhor ajudar na possível solução informo os dados abaixo: (nivel no Delphi iniciante)


Uso o Delphi 7


Banco de Dados em access.


Tabela TblCadCrim:

IdCrim (chave primaria)

Nome

Apelido

RG

Nacionalidade

Pai

Mae

Data_Nascimento

Naturalidade

UF

Procurado

DataCadastro

LinkFotoCrim


TblEndCrim:

IdendCrim (Chave primária)

IdCrim (chave estrangeira)

LogEndCrim

EndEndCrim

NunEndCrim

BairroEndCrim

MunicEndCrim

UfEndCrim

dataCadEndCrim

ObsEndCrim


Data Module: (Dados)

AdoConnection = ConIdFotoCrim

AdoDataSet (AdoDb) = TblCdCrim

DataSource = DsCadCrim

AdoDataSet (AdoDb) = TblEndCrim

DataSource = DsEndCrim


Compartilhar este post


Link para o post
Compartilhar em outros sites

Pessoal após pesquisar em alguns foruns consegui a seguinte solução:

No evento OnShow do formulário de endereços foi incrementado o seguinte código:

 

FrmPeApelend.Caption:= 'Resultado da Pesquisa pelo Apelido - Endereços - ' + FrmPesqApel.DBEdit2.Text;
ou seja a caption apresenta a frase Resultado da Pesquisa pelo Apelido - Endereços - que é fixa e recebe o complemento do nome de quem esta cadastrado no formulário de cadastro de pessoas que estiver no formulário principal que esta aberto.
Foram adicionadas as units necessárias no formulário de endereços, ou seja, foi adicionada a clausula uses a unit do formulário principal e a unit dados.
se houver algum lugar onde deva clicar para encerrar este tópico por favor me avisem.
obrigado
tfa
osvaldo

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.