Como clicar em um arquivo e saber o nome dele

[porter]

Olá pessoal, com esse comando, consigo abrir todos os arquivos com extensão .txt na pasta c:\arquivostxt, como faço
para ao clicar em determinado arquivo pegar o nome dele para imprimi-lo com o WIN32PRN, ou outro comando onde
eu consiga selecionar o arquivo, pegar o nome dele para imprimir, quero atribuir o nome para variavel arq .

Código: Selecionar todos

arq  := MemoRead( win_GetOpenFileName(, "", "c:\arquivostxt\", "TXT", "*.TXT", 1 ) )
W32PRN(arq,"HP DESKJET 3510",cTipoImpCupom)

Harbour 3.2(dev)
Obrigado.

[Claudio Soto]

En HMG tenes:
https://www.hmgforum.com/viewtopic.php? ... Easy+build

No es para imprimir, es para compilar proyectos con un click, pero se podria adaptarlo

[JoséQuintas]

como faço
para ao clicar em determinado arquivo pegar o nome dele para imprimi-lo com o WIN32PRN

o cara pega o nome
win_GetOpenFileName(, "", "c:\arquivostxt\", "TXT", "*.TXT", 1 )

já pegando o conteúdo
arq = memoread( ... )

e usa o conteúdo como se fosse nome
W32PRN(arq,"HP DESKJET 3510",cTipoImpCupom)

e pergunta como pegar o nome.....

Se quer o nome, porque pegou o conteúdo?
Tem dia que de noite é fod.... kkkkk

[porter]

Boa noite JoseQuintas, eu achei que com essa rotina eu conseguiria pegar o nome do arquivo selecionado, para usar posteriormente,
mas ele me traz o conteúdo, qual comando devo usar para pegar o nome de tal arquivo selecionado, obrigado por sua atenção.

[porter]

Agora deu certo, dessa forma consigo pegar o nome, obrigado Cláudio Soto e JoséQuintas.

Código: Selecionar todos

arq  := ( win_GetOpenFileName(, "", "c:\arquivostxt\", "TXT", "*.TXT", 1 ) )

[JoséQuintas]

Agora deu certo, dessa forma consigo pegar o nom

Pois é, você já tinha feito, mas imendou com o MemoRead() que já usa o nome pra ler o arquivo.