OpenDialog - Como abrir a janela do windows para selec...?

Discussão sobre a biblioteca Fivewin - O Clipper para Windows.

Moderador: Moderadores

Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por JoséQuintas »

deividdjs escreveu:Estou utilizando o exemplo dos arquivos para selecionar arquivos .. ficou show !! compila e funciona perfeito, porém dá um solicitação de "WARNINGS" na ultima linha e não entendi porque .. alguem já passou por isso ??

é na ultima linha .. não tem nada aí !!

"W8080 PrtToPrt64 is declared but never used"
Só traduzir:
PrtToPrt64 está declarada mas nunca usada

Chegando no final da rotina, o compilador concluiu que não está usando isso pra nada.
Não sei se é só na compilação -ge1, mas mostra qual a linha que declarou.

Não é um erro, mas é algo como: declarou pra que?
O compilador não sabe se declarou errado, ou se falta fonte, apenas no final foi quando detectou a falta de uso.
erro.png
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
deividdjs
Usuário Nível 3
Usuário Nível 3
Mensagens: 377
Registrado em: 19 Set 2006 09:39
Localização: Foz do Iguaçu / Pr

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por deividdjs »

Sim eu traduzi ... O pior é q não existe nada declarado com esse nome ... é bizarro ... será q pode ser o compilador ??
Windows 11 + Harbour 3.2 + MINGW64 gcc 14.1.0 + Visual Lib + GTWVG + LETODBF WINDOWNS/LINUX
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por JoséQuintas »

Verifique com atenção, verifique se tem #include ou #define
Compile com -p pra ver o ppo se for o caso.
Pelo nome, parece até que seria função, pointer 32 bits para pointer 64 bits, mas tá reclamando de variável e não de função.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
deividdjs
Usuário Nível 3
Usuário Nível 3
Mensagens: 377
Registrado em: 19 Set 2006 09:39
Localização: Foz do Iguaçu / Pr

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por deividdjs »

Obrigado Zéh .. vou buscar .. abraço meu nobre.
Windows 11 + Harbour 3.2 + MINGW64 gcc 14.1.0 + Visual Lib + GTWVG + LETODBF WINDOWNS/LINUX
Avatar do usuário
deividdjs
Usuário Nível 3
Usuário Nível 3
Mensagens: 377
Registrado em: 19 Set 2006 09:39
Localização: Foz do Iguaçu / Pr

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por deividdjs »

JoséQuintas escreveu:Verifique com atenção, verifique se tem #include ou #define
Compile com -p pra ver o ppo se for o caso.
Pelo nome, parece até que seria função, pointer 32 bits para pointer 64 bits, mas tá reclamando de variável e não de função.
Zéh complilei com menos -ge1 e -p e não mostra onde está declarado ... até mostra porem a linha q mostra é a ultima de prg q está em branco ... não existe nada ali ... tenso !! rsrs
Anexos
compilado com -ge1 e -p.jpg
Windows 11 + Harbour 3.2 + MINGW64 gcc 14.1.0 + Visual Lib + GTWVG + LETODBF WINDOWNS/LINUX
Avatar do usuário
deividdjs
Usuário Nível 3
Usuário Nível 3
Mensagens: 377
Registrado em: 19 Set 2006 09:39
Localização: Foz do Iguaçu / Pr

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por deividdjs »

fiz uma pesquisa nos arquivos procurando esta variavel ... encontrou dentro de uma include no BCC.. .pra que serve ela ?? alguem sabe?
Anexos
pesquisa ptrtoptr.jpg
Windows 11 + Harbour 3.2 + MINGW64 gcc 14.1.0 + Visual Lib + GTWVG + LETODBF WINDOWNS/LINUX
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por JoséQuintas »

Isso é fonte em C e não PRG normal.
Geralmente o #define troca uma coisa por outra, à primeira vista não faz sentido ser esse #define o problema.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por JoséQuintas »

Mas pera aí....
Está usando ponto de vista errado.
A pergunta correta é: pra que esse fonte ? (pra não dizer essa merd.)

Tá parecendo API Windows pra fazer o que já existe pronto, justamente a outra função que destaquei na pesquisa do hbmk2.
Tem a dupla GetOpenFileName() e GetSaveFileName(), uma é pra obter nome existente, e outra é pra nome novo e salvar.
Nesse fonte em C tem o nome GetSaveFileName.
Se já existe no harbour, isso é lixo, nem é pra perder tempo com isso, é pra apagar e substituir, se é que usa.

Uma diferença entre harbour e xharbour é essa:
Se não tem no xharbour, o povo sai colocando fonte em C, e às vezes até quando não precisa, inclusive fivewin.
O problema é que às vezes a função é pra determinado compilador C, e com o tempo não vale mais.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
deividdjs
Usuário Nível 3
Usuário Nível 3
Mensagens: 377
Registrado em: 19 Set 2006 09:39
Localização: Foz do Iguaçu / Pr

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por deividdjs »

JoséQuintas escreveu:Mas pera aí....
Está usando ponto de vista errado.
A pergunta correta é: pra que esse fonte ? (pra não dizer essa merd.)

Tá parecendo API Windows pra fazer o que já existe pronto, justamente a outra função que destaquei na pesquisa do hbmk2.
Tem a dupla GetOpenFileName() e GetSaveFileName(), uma é pra obter nome existente, e outra é pra nome novo e salvar.
Nesse fonte em C tem o nome GetSaveFileName.
Se já existe no harbour, isso é lixo, nem é pra perder tempo com isso, é pra apagar e substituir, se é que usa.

Uma diferença entre harbour e xharbour é essa:
Se não tem no xharbour, o povo sai colocando fonte em C, e às vezes até quando não precisa, inclusive fivewin.
O problema é que às vezes a função é pra determinado compilador C, e com o tempo não vale mais.
Que burro que eu sou .. kkkkk vc abriu meus olhos home ....

solucionado com uma linha de codigo kkkk

Código: Selecionar todos

cArqXML := win_GetOpenFileName(, "Importar XML", "\XML\", "XML", "*.XML", 1 )
Obrigado .. Abraço! cê o é cara homi .. rs
Windows 11 + Harbour 3.2 + MINGW64 gcc 14.1.0 + Visual Lib + GTWVG + LETODBF WINDOWNS/LINUX
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por JoséQuintas »

Aí não seria a outra?

Uma coisa é pra ABRIR (open) outra é pra SALVAR (save).
Parece a mesma coisa, mas não é, numa o arquivo precisa existir, na outra pode ser arquivo novo.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
deividdjs
Usuário Nível 3
Usuário Nível 3
Mensagens: 377
Registrado em: 19 Set 2006 09:39
Localização: Foz do Iguaçu / Pr

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por deividdjs »

Sim.. na função tinha as duas ... porem agora eu preciso somente de abrir para importar o XML .. resolveu meu problema de forma simples .. valeu parceiro !!
Windows 11 + Harbour 3.2 + MINGW64 gcc 14.1.0 + Visual Lib + GTWVG + LETODBF WINDOWNS/LINUX
Avatar do usuário
Itamar M. Lins Jr.
Administrador
Administrador
Mensagens: 7928
Registrado em: 30 Mai 2007 11:31
Localização: Ilheus Bahia
Curtiu: 1 vez

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por Itamar M. Lins Jr. »

Olá!
Sim.. na função tinha as duas ... porem agora eu preciso somente de abrir para importar o XML .. resolveu meu problema de forma simples .. valeu parceiro !!
Tinha postado lá atrás, mas vc copiou o código velho, das funções em C que faz a mesma coisa. Tava esperando vc entender o que vc fez.
Basta 1 linha(a função que passei) para abrir a JANELA WINDOWS, a função é só isso mesmo que substitui todos aqueles códigos.
E tem muitas outras funções.
Inclusive com AGUARDE, ERRO, etc. pode usar no lugar de alert()

Saudações,
Itamar M. Lins Jr.
Saudações,
Itamar M. Lins Jr.
Avatar do usuário
deividdjs
Usuário Nível 3
Usuário Nível 3
Mensagens: 377
Registrado em: 19 Set 2006 09:39
Localização: Foz do Iguaçu / Pr

OpenDialog - Como abrir a janela do windows para selec...?

Mensagem por deividdjs »

Itamar M. Lins Jr. escreveu:Olá!
Sim.. na função tinha as duas ... porem agora eu preciso somente de abrir para importar o XML .. resolveu meu problema de forma simples .. valeu parceiro !!
Tinha postado lá atrás, mas vc copiou o código velho, das funções em C que faz a mesma coisa. Tava esperando vc entender o que vc fez.
Basta 1 linha(a função que passei) para abrir a JANELA WINDOWS, a função é só isso mesmo que substitui todos aqueles códigos.
E tem muitas outras funções.
Inclusive com AGUARDE, ERRO, etc. pode usar no lugar de alert()

Saudações,
Itamar M. Lins Jr.
Top Itamar ... no final eu entendi heheh .. valeu amigos!! Forte abraço!
Windows 11 + Harbour 3.2 + MINGW64 gcc 14.1.0 + Visual Lib + GTWVG + LETODBF WINDOWNS/LINUX
Responder