Clipper On Line • Ver Tópico - abrir o explorer com o arquivo em destaque

abrir o explorer com o arquivo em destaque

Projeto Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

 

abrir o explorer com o arquivo em destaque

Mensagempor juniorcamilo » 30 Mar 2020 10:45

Amigos.
quando fazemos download da net exite uma opção q é "Mostrar na Pasta", temp como abrir o explorer com tal arquivo em seleção mostrando ao usuário?

ex:
MYRUN( "explorer c:\meulocal") e o nome do arquivo pra ficar em destaque/selecionado(obs sem abrir o mesmo)
Anexos
Sem título.png
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

abrir o explorer com o arquivo em destaque

Mensagempor JoséQuintas » 30 Mar 2020 11:36

Tem na hbwin a de mostrar arquivos, onde define o tipo de arquivo a ser mostrado, por exemplo, *.XML.
Não sei se resolve seu problema.

open.png
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"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 de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

abrir o explorer com o arquivo em destaque

Mensagempor juniorcamilo » 30 Mar 2020 12:35

JoséQuintas escreveu:Tem na hbwin a de mostrar arquivos, onde define o tipo de arquivo a ser mostrado, por exemplo, *.XML.
Não sei se resolve seu problema.

open.png


não seria isso JoséQuintas!!
seria na verdade abrir a pasta com tds os xmls mas deixar somente o xml de uma determinada nfe selecionado, ou seja, estou no emissor de nfe do me sistema e quero q abra no local onde esta os xmls e localize o xml dessa nota para o cliente copiar ou fazer oq ele quiser!
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

abrir o explorer com o arquivo em destaque

Mensagempor Vander » 31 Mar 2020 00:46

Este código só deixa abrir o arquivo passado como parâmetro (incluindo o caminho completo).
Exemplo :
_arq12a := "c:\arq_txt\cl00012\arquivo.txt")

do while .t.
   oDbFile := cGetFile( _arq12a , "...::| Selecionar |::..." )
   if Empty( oDbFile )
      exit
     ELSE
      fotocl := oDbFile
      if fotocl =  _arq12a
         WinExec("NotePad " + fotocl,3)
         exit
        else
         loop
      endif
   EndIf
enddo

Espero que ajude.
HbMake v1.17
xHarbour build 0.99.70 Intl. (SimpLex)
Borland C++ 5.5.1
fivewin 6.12 (FREE)
Workshop 4.5
MEdit
Avatar de usuário

Vander
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 212
Data de registro: 23 Jul 2004 01:43
Cidade/Estado: João Monlevade - MG
Curtiu: 0 vez
Mens.Curtidas: 6 vezes

abrir o explorer com o arquivo em destaque

Mensagempor juniorcamilo » 31 Mar 2020 07:53

bom dia!
eu tenho um serio problema em explicar e me expressar(quem ja viu meus post vai saber oq estou afirmando,rsrs)!
para amigos entenderem faz o seguinte procedimento:
com o navegador chrome aqui mesmo no fórum tente baixar algo do download ou msm dos post(att baixar Arquivos), apos isso no canto inferior esquerdo do navegador iras ver o arquivo sendo baixado ou já baixado click na seta dele q abrira a opção que descrevi acima, c click no "Mostrar na Pasta" o windows abrira a pasta e posicionara sobre o arquivo recém baixado!
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

abrir o explorer com o arquivo em destaque

Mensagempor asimoes » 31 Mar 2020 13:35

O que eu conheço na hwgui é a função HWG_SELECTFILE

Exemplo de uso:

.ret é o tipo de arquivo, essa função não destaca o arquivo, mas filtra o tipo de arquivo para ser selecionado

cNome_Arq := hwg_SelectFile( {"Arquivo retorno( *.ret )","(*.ret)"}, {"*.ret","*.ret"}, [D:\TBI_TCP\], "ASAPREV - Selecionar arquivo retorno" )
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

abrir o explorer com o arquivo em destaque

Mensagempor asimoes » 31 Mar 2020 13:51

Acho que é próximo do que você quer:

Função C_PUTFILE portada da MiniGui mas pode ser usada em qq compilação

cNome_Arq := C_PUTFILE("ControlPos File (*.ret)" + Chr(0) + "*.ret" + Chr(0), "Save control positon to file", "D:\TBI_TCP\", Nil, "CB14030200.RET" )

#pragma BEGINDUMP

#define _WIN32_IE      0x0500
#define HB_OS_WIN_USED
#define _WIN32_WINNT   0x0400
#include <shlobj.h>

#include <windows.h>
#include <commctrl.h>
#include "hbapi.h"
#include "hbvm.h"
#include "hbstack.h"
#include "hbapiitm.h"
#include "winreg.h"
#include "tchar.h"

// Like C_PUTFILE(aType,cTitle,cDefDir,lChaneDir,!NEW!cDefaultFileName)
HB_FUNC ( C_PUTFILE )
{

OPENFILENAME ofn;
char buffer[512];

int flags = OFN_FILEMUSTEXIST | OFN_EXPLORER ;

if ( hb_parl(4) )
{
  flags = flags | OFN_NOCHANGEDIR ;
}

strcpy( buffer, hb_parc(5) );   //here is change "cDefaultFileName"

memset( (void*) &ofn, 0, sizeof( OPENFILENAME ) );
ofn.lStructSize = sizeof(ofn);
ofn.hwndOwner = GetActiveWindow() ;
ofn.lpstrFilter = hb_parc(1) ;
ofn.lpstrFile = buffer;
ofn.nMaxFile = 512;
ofn.lpstrInitialDir = hb_parc(3);
ofn.lpstrTitle = hb_parc(2) ;
ofn.Flags = flags;

if( GetSaveFileName( &ofn ) )
{
  hb_retc( ofn.lpstrFile );
}
else
{
  hb_retc( "" );
}

}

#pragma ENDDUMP
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

abrir o explorer com o arquivo em destaque

Mensagempor janio » 31 Mar 2020 14:28

eu tenho um serio problema em explicar e me expressar(quem ja viu meus post vai saber oq estou afirmando,rsrs)!


Eu entendi perfeitamente o que vc quer.

Vc quer, e eu quero tbm rsrs, abrir o WINDOWS EXPLORER ja com um determinado arquivo selecionado!

Não tem nada a ver com hwgui ou minugui, etc. Eh o Windows Explorer. Abrir com um arquivo selecionado pra facilitar ao usuario, menos afeito a tecnologia basica, localizar facilmente o arquivo no windows

Tipo:
run explorer.exe ArquivoTal
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
Avatar de usuário

janio
Colaborador

Colaborador
 
Mensagens: 1835
Data de registro: 06 Jul 2004 07:43
Cidade/Estado: UBAJARA - CE
Curtiu: 8 vezes
Mens.Curtidas: 68 vezes

abrir o explorer com o arquivo em destaque

Mensagempor asimoes » 31 Mar 2020 15:02

É bem complicado isso, vamos complicar o que pode ser simples né?
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

abrir o explorer com o arquivo em destaque

Mensagempor ANDRIL » 31 Mar 2020 15:30

Tente ai!

run( 'explorer /select, "c:\np\makemix.ini" ')


c:\np\makemix.ini = caminho e nome completo do arquivo que deseja selecionar entre aspas duplas.

fonte com mais alguns parâmetros:
http://ptcomputador.com/Sistemas/windows/227217.html
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
Avatar de usuário

ANDRIL
Usuário Nível 5

Usuário Nível 5
 
Mensagens: 1270
Data de registro: 06 Jul 2004 00:44
Curtiu: 12 vezes
Mens.Curtidas: 46 vezes

abrir o explorer com o arquivo em destaque

Mensagempor asimoes » 31 Mar 2020 16:09

Pode pegar aqui o que você quer:

Passa o nome do arquivo para a funtion SELECTFILE que será selecionado o arquivo pelo explorer na pasta onde ele está.
Basta incorporar o código em C++

SELECTFILE( "d:\TBI_TCP\CB14030200.RET")

#pragma BEGINDUMP

#define _WIN32_IE      0x0500
#define HB_OS_WIN_USED
#define _WIN32_WINNT   0x0400
#include <shlobj.h>

#include <windows.h>
#include <commctrl.h>
#include "hbapi.h"
#include "hbvm.h"
#include "hbstack.h"
#include "hbapiitm.h"
#include "winreg.h"
#include "tchar.h"

HB_FUNC ( SELECTFILE )
{
   
   BrowseToFile( hb_parc(1)  );
   
}
void BrowseToFile( LPCTSTR filename)
{
       ITEMIDLIST *pidl = ILCreateFromPath(filename);
    if(pidl) {
        SHOpenFolderAndSelectItems(pidl,0,0,0);
        ILFree(pidl);
      }
}

#pragma ENDDUMP
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

abrir o explorer com o arquivo em destaque

Mensagempor asimoes » 31 Mar 2020 16:18

â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

abrir o explorer com o arquivo em destaque

Mensagempor juniorcamilo » 31 Mar 2020 16:28

ANDRIL escreveu:run( 'explorer /select, "c:\np\makemix.ini" ')


obrigado atds... funcionou perfeitamente...
Avatar de usuário

juniorcamilo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 343
Data de registro: 10 Nov 2006 08:12
Cidade/Estado: Pará
Curtiu: 29 vezes
Mens.Curtidas: 2 vezes

abrir o explorer com o arquivo em destaque

Mensagempor pauloa1 » 31 Mar 2020 16:42

Alguém tem alguma função que mostre pelo google maps os pontos no mapa?

Exemplo:
Eu tenho a latitude e longitude de 3 pontos.

Lat_01:= -28.5178570000000
Lon_01:=-53.9918220000000

Lat_02:=-28.5176860000000
Lon_02:=-53.9916380000000

Lat_03:=-28.5175420000000
Lon_03:=-53.9918450000000

Que abra o google maps, com os 3 pontos marcados no mapa.

Paulo
pauloa1
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 223
Data de registro: 25 Jun 2008 14:57
Cidade/Estado: Augusto Pestana-RS
Curtiu: 2 vezes
Mens.Curtidas: 11 vezes

abrir o explorer com o arquivo em destaque

Mensagempor asimoes » 31 Mar 2020 17:24

Francamente que tempo perdido, por isso que não não gosto de trazer solução aqui
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Próximo



Retornar para Harbour

Quem está online

Usuários vendo este fórum: Bing [Bot] e 6 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!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro