Como posso obter o endereço de um arquivo...

Pessoal,

Como posso obter o endereço de um arquivo ao arrastar ele para uma janela? Que eventos e funções devo usar?

Um abraço.

Meu caro, será que seria um Botão para abrir a caixa de diálogo para o usuário informar o caminho do arquivo?

Estou postando um esqueminha que tenho para obtenção do endereço de um arquivo de imagem, veja se lhe ajuda.

Defina um Botão Btn-Procurar e ponha isto .

Antes defina estas variáveis pra testar.

Código:

DEF VAR OKpressed AS LOG NO-UNDO.
DEF VAR v-arquivo AS CHAR NO-UNDO.
/* NO Evento CHOOSE  Do Botão vc poe isto */

SYSTEM-DIALOG GET-FILE v-arquivo
        TITLE       "Selecione uma imagem..."
        FILTERS     "Arquivos de bitmap (*.BMP)"    "*.bmp",
                    "JPEG (*.JPG)"                  "*.jpg",
                    "GIF (*.GIF)"                   "*.gif,*.p",
                    "Todos os arquivos de imagens"  "*.jpg,*.gif,*.bmp",
                    "Todos os arquivos"             "*.*"
        MUST-EXIST
        USE-FILENAME
    /*     INITIAL-DIR TRIM("C:\Arquivos de programas")  */
        UPDATE OKpressed.
     
    IF OKpressed = TRUE THEN
    DO:
       /* Aki vc usa o Caminho que está na variáveil v-arquivo... por exemplo.. MESSAGE v-arquivo VIEW-AS ALERT-BOX */
  END.
    

Será que era isto?

pois é, isso resolve... só queria saber se eu conseguiria pegar o endereço do arquivo ao arrastar diretamente para a janela... assim como é em vários programas...