Registriert seit: 16. Jan 2005
448 Beiträge
|
wie ruft man den WSL auf windows 10 in Delphi auf?
14. Apr 2024, 18:46
Liebe Leute,
ich habe hier diesen code (unten) und bekommen diesen Fehler:
Fehler beim Starten des WSL-Prozesses
cmd: wsl find . - type f -name socpus*.ris -exec cat {} + > ../bigmergedscopusfiles.ris
Woran kann das liegen?
DANKE
Delphi-Quellcode:
procedure tform1.RunAWKCommandInWSL(cmd: string);
var
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
begin
ZeroMemory(@StartupInfo, SizeOf(StartupInfo));
StartupInfo.cb := SizeOf(StartupInfo);
try
if CreateProcess( nil, Pchar(format(' '' %s'' ',[cmd])) , nil, nil, False, 0, nil, nil, StartupInfo, ProcessInfo) then
begin
// Prozess erfolgreich gestartet
CloseHandle(ProcessInfo.hProcess);
CloseHandle(ProcessInfo.hThread);
end
else
begin
// Fehler beim Starten des Prozesses
//ShowMessage('Fehler beim Starten des WSL-Prozesses');
WriteLOgMemo(msg_window, run_mode, clRed, format(' Fehler beim Starten des WSL-Prozesses cmd: %s',[cmd]));
end;
except
on E : Exception do
WriteLOgMemo(msg_window, run_mode, clRed, format(' Exception-error: %s Call: %s',[e. message,format(' CreateProcess(nil, Pchar(%s) , nil, nil, False, 0, nil, nil, StartupInfo, ProcessInfo) ',[cmd])]));
end;
end;
procedure tform1.wslcmd();
begin
//RunAWKCommandInWSL('dir *.*');
RunAWKCommandInWSL(' wsl find . - type f -name socpus*.ris -exec cat {} + > ../bigmergedscopusfiles.ris');
end;
|
|
Zitat
|