FMX XOS 에서 ShellApi 대체방법 문의합니다!

[ParkSangWo]

안녕하세요 파이어몽키로 맥 어플리케이션을 제작하고 있는데요 FMX 에서는 uses 절에 ShellApi를 적용할 수 없더라구요..!

그래서 대신에 어떤걸 쓸 수 있을까요..? 

아래 코드와 같이 디렉토리나 파일을 실행하고 싶습니다...!

ShellExecute(Handle, 'Open', pchar(파일경로), nil, '', SW_SHOWNORMAL);   <<= FMX에서는 불가한 코드..

[Miniuser]

아래 소스와 사이트를 한번 참고해보시면 좋을 것 같습니다.

저도 Mac은 사용하지 않아서, 테스트가 어려워 실제 테스트는 하지 못했습니다..

 

uses
{$IFDEF MSWINDOWS}
winapi.shellapi
{$ENDIF}
{$IFDEF POSIX}
Posix.Stdlib
{$ENDIF POSIX}
;

function ExecuteFile(const filename, Params, DefaultDir: string;
      ShowCmd: integer): THandle;
  begin
    {$IFDEF MSWINDOWS}
      result := ShellExecute(0, 'Open', PChar(filename), PChar(Params),
        PChar(DefaultDir), ShowCmd);
    {$ENDIF}
    {$IFDEF MACOS}
      _system(PAnsiChar('open ' + AnsiString(filename)));
    {$ENDIF}
  end;

 

참고 사이트 : https://stackoverflow.com/questions/43673143/firemonkey-application-launch-external-app-when-running-under-os-x