ExecuteResult:=ShellExecute(Handle, 'open', PChar(filename), nil, nil, SW_HIDE); case ExecuteResult of 0 : ShowMessage('Error ' + ...
確定! 回上一頁