![]() |
Re: shellexecute mit pipes im command
Willst du jetzt n Konsolenprog schreiben oder eins starten?
ersteres geht ganz einfach: Deitei-->Neu-->Andere-->Konsolenanwendung (oder so ähnlich...) letzteres: CreateProcess nehmen(Verwendung bitte selbst im PSDK nachgucken). Diese Funktion gibt IMHO n Handle zurück. Dieses Handle übergibtst du ner Funktion KillProcess. N Codeschnipsel dafür müsstest du leicht finden können... mfg Christian |
Re: shellexecute mit pipes im command
Hallo Enrico,
Zitat:
Grüße vom marabu |
Re: shellexecute mit pipes im command
Moin Enrico,
dem Problem mit der limitierten Länge von Stringliteralen kannst Du auch durch + begegnen: 'max. 255 Zeichen' + 'max. 255 Zeichen' + ... |
Re: shellexecute mit pipes im command
hi, so also ich habe das jetzt folgendes
Delphi-Quellcode:
nur das beenden klappt nicht wirklich, der prozess läuft weiter :(
var
Form2: TForm2; ProcessInfo: TProcessInformation; StartupInfo: TStartupInfo; implementation {$R *.dfm} procedure TForm2.Button1Click(Sender: TObject); begin FillChar(StartupInfo, SizeOf(TStartupInfo),0); StartupInfo.cb := SizeOf(TStartupInfo); StartupInfo.dwFlags := STARTF_USESHOWWINDOW; StartupInfo.wShowWindow := SW_HIDE; if CreateProcess( nil, PChar(Edit1.Text), nil, nil, False, NORMAL_PRIORITY_CLASS, nil, PChar('C:\'), StartupInfo, ProcessInfo) then begin Showmessage('Prossess gestartet'); End else ShowMessage('Fehler'); end; procedure TForm2.Button2Click(Sender: TObject); begin CloseHandle(ProcessInfo.hProcess); end; |
Re: shellexecute mit pipes im command
Nimm nicht CloseHandle, sondern
![]() Is nur schnell rausgesucht. Nicht weiter mit beschäftigt... Hab das aber auch noch nie gemacht... Korrigiert mich also, wenn ich Blödsinn geredet hab... mfg Christian |
Re: shellexecute mit pipes im command
Moin Enrico,
Du musst dabei allerdings berücksichtigen, dass Du mit TerminateProcess den Prozess nicht sauber beendest, sondern abschiesst. |
Re: shellexecute mit pipes im command
Zitat:
mfg Christian |
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:35 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz