Datei auf dem Betriebssystem ausführen
ID | 44 |
---|---|
Link Reference | Not set |
Link Credits | Not set |
Link Technical Documentation | Not set |
PlCodelang | Delphi |
PlGroup | Filehandling |
PlItemTitle | Datei auf dem Betriebssystem ausführen |
Code | procedure TForm1.MenuDummy1Click(Sender: TObject); var ExeName : array[0..255] of char; myFile : String; begin myFile:='winword.exe'; Showmessage('Starte: ' + myFile); StrPCopy(ExeName, myFile); ShellExecute(MainForm.Handle, 'open', ExeName, nil, nil, SW_SHOWNORMAL); // Drucken geht dann so (siehe auch Dateitypen im Windows Explorer): ShellExecute(MainForm.Handle, 'print', ExeName, nil, nil, SW_SHOWNORMAL); end; |
Result Example |