Código Delphi [-] If (SaveDialog_SHP.Execute) Then WinExec(PChar(SaveDialog_SHP.FileName+'\COMMAND.COM /C java -jar mdbToshape.jar '+SaveDialog_SHP.FileName),SW_HIDE);
If (SaveDialog_SHP.Execute) Then WinExec(PChar(SaveDialog_SHP.FileName+'\COMMAND.COM /C java -jar mdbToshape.jar '+SaveDialog_SHP.FileName),SW_HIDE);