Abrindo pasta em Lazarus
Gostaria de abrir pasta no Lazarus já que no Delphi o código é este:
// Foi declarado na Uses a Biblioteca " ShellApi "
ShellExecute(Application.HANDLE, 'open', PChar(ExtractFilePath('\\\\MAPA-HOLTER\\Users\\MAPA-HOLTER\\Desktop\\RECEPCAO\\')),nil,nil,SW_SHOWNORMAL);
Helton Garrido
Curtidas 0