この記事は、ShellAPI.ShellExecuteを使ったサンプルで「作成済みのテキストファイル(test.txt)をメモ帳(notepad.exe)で開いて」います。

 

※全てのDelphiで動作する保証はありません。また、内容に関し管理人は全ての責任を負いかねます

サンプル ※説明に必要な部分しか記述していません

 

 

※ShellAPI.ShellExecute文は都合上、改行していますが、テストの際は改行しないで下さい

 


下記を実行すると

procedure TForm1.Button1Click(Sender: TObject);

//uses句に ShellAPI を追加します

var
    f_path: String;

begin

    //この例では同じフォルダにあるファイルです
    f_path := 'test.txt';


    //'open'の代わりにnilを使っても動作します
    ShellAPI.ShellExecute(Handle,
                         'open',
                         'notepad.exe',
                         PWideChar(f_path), nil, SW_SHOWNORMAL);


end;

 

このようになります。

 

補足情報

embarcadero.comにもありますが、結局、microsoft.comの英語版に飛びます。

 



ȥåץڡ