NO MENU ABRIR COMO FACO PARA ABRIR ULTIMOS ACESSOS

USUARIO.EXCLUIDOS 20/03/2005 19:47:16
#73936 Resposta escolhida

Trabalhe com index

Crie um menu

Ex:

MnuAtalho com index =0
torne ele invisivel vidible = false

toda vez que quiser adicionar algo ao menu crie um index dele assim:

Crie primeiro um contador EX:

Public Contador as integer

Contador = Contador +1

Load MnuAtalho(Contador)
mnuatalho.visible = true

depois trabalhe com os indexs

Espero ter ajudado

Qualquer Duvida me contacte

USUARIO.EXCLUIDOS 20/03/2005 19:48:58
#73937

Desculpe , Quando Precisar apagar os menus

Descarregue com unload

EX

For Contador = 1 to ubound(mnuAtalho)
unload MnuAtalho(Contador)
next Contador


Falo Amigo

USUARIO.EXCLUIDOS 20/03/2005 22:32:46
#73959

Arquivo Editar Exibir Inserir Formatar
__________________________________
Salvar como
__________________________________
Imprimir
__________________________________
1 C:\..\meus documentos\carta.doc
2 C:\..\arquivos de programas\leiame.doc
3 C:\..\IRPF2005\leiame.doc
4 c:\..\path
__________________________________

Obrigado pela ajuda, não sei se vc entendeu, mas a ideia é a que está acima, relacionar os quatros ultimos acessos de arquivo com seu respectivo path, assim como no word ou excel.
Seu exemplo ajudou mas não totalmente.
Grato
Mauricio