Boa Tarde,
Estou a ver vários exemplos da classe metro e não estou a consiguir fazer o que desejo, preciso o seguinte:
na primeira tela quero que mostre 1 Metrobutton por cada registo da tabela REGIOES.DBF em que o caption é o campo nome desta mesma, quando o usuário clicar num deles preciso saber em que Recno() da REGIOES.DBF clicou , para depois fazer um filtro a tabela ARTIGOS.DBF em que o campo CodReg=RECNO() da tabela REGIOES clicado na primeira tela e mostrar todos os artigos filtrados em 1 metrobutton por cada registo, tem como fazer isso?
Cumprimentos
João Alpande
Classe Metro
Moderador: Moderadores
2 Mensagens • Página 1 de 1
Classe Metro
por joaoalpande » 14 Mai 2015 13:34
-
joaoalpande Usuário NÃvel 2 
- Mensagens: 92
- Data de registro: 24 Fev 2005 09:04
- Cidade/Estado: CAMPO GRANDE / MS
- Curtiu: 1 vez
- Mens.Curtidas: 3 vezes
Classe Metro
por joaoalpande » 28 Mai 2015 07:10
Bom dia , com a ajuda do amigo Kapiaba e do Antonio Linares resolvi o problema .
Antonio alterou metropnl.ch :
<{uAction}> para [{| Self |<uAction>}]
No meu prg fiz assim para pegar o recno() do arquivo dbf:
while !eof()
IF !EMPTY(FieldGet( 1 ))
DEFINE METROBUTTON oBtn OF oMetro ;
PROMPT oemtoansi(FieldGet( 1 ));
COLOR CLR_WHITE,CLR_RED ;
ALIGN "MIDDLECENTER" ;
FONT oFontSmall2 ;
GROUP 2 ;
large;
ACTION ShowRecords( ::Cargo,oWnd ,oMetro )
oBtn:Cargo := RecNo()
ENDIF
DbSkip()
end
Obrigado
João Alpande
Antonio alterou metropnl.ch :
<{uAction}> para [{| Self |<uAction>}]
No meu prg fiz assim para pegar o recno() do arquivo dbf:
while !eof()
IF !EMPTY(FieldGet( 1 ))
DEFINE METROBUTTON oBtn OF oMetro ;
PROMPT oemtoansi(FieldGet( 1 ));
COLOR CLR_WHITE,CLR_RED ;
ALIGN "MIDDLECENTER" ;
FONT oFontSmall2 ;
GROUP 2 ;
large;
ACTION ShowRecords( ::Cargo,oWnd ,oMetro )
oBtn:Cargo := RecNo()
ENDIF
DbSkip()
end
Obrigado
João Alpande
-
joaoalpande Usuário NÃvel 2 - Mensagens: 92
- Data de registro: 24 Fev 2005 09:04
- Cidade/Estado: CAMPO GRANDE / MS
- Curtiu: 1 vez
- Mens.Curtidas: 3 vezes
Ver tópicos ativos •
2 Mensagens • Página 1 de 1
Quem está online
Usuários vendo este fórum: Nenhum usuário registrado online e 2 visitantes

Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
