![]() |
Re: Konsole nachproggen - kleine Schwierigkeiten
Gib den kompletten Befehl in "Command" an und las Params leer
Delphi-Quellcode:
Und das er wartet, bis der Prozess zu ende ist liegt an diesem teil :
CaptureDosCmd('ping localhost','',Memo1.lines);
Delphi-Quellcode:
Das "WaitForSingleObject" wartet bis der Prozess beendet ist.
repeat
WaitHandle := WaitForSingleObject( ProcessInfo.hProcess,0); CurSize := FileSeek(ReadPipe,0,2); If (CurSize >= 4096) then // Puffer in Memo ausgeben und damit leeren GetBuffer; Application.ProcessMessages; until (WaitHandle = WAIT_OBJECT_0) or (WaitHandle = WAIT_FAILED) or application.terminated; if not application.terminated then begin CurSize := FileSeek(ReadPipe,0,2); If (CurSize > 0 ) then // Falls Rest im Puffer, in Memo ausgeben GetBuffer; end else OutPutMemo.add('# Operation canceled!'); FreeMem(CaptureBuffer); CloseHandle(ProcessInfo.hProcess); CloseHandle(ProcessInfo.hThread); CloseHandle(ReadPipe); CloseHandle(writePipe); end Du musst diesen Teil irdenwie umschreiben und regelmässig die Readpipe leeren (vielleicht über nen Timer ??) |
Re: Konsole nachproggen - kleine Schwierigkeiten
ich habs jetzt mal zum laufen gebracht...
THX!!! Mal schaun was ich mit dem ftp machn lässt... |
Re: Konsole nachproggen - kleine Schwierigkeiten
Dann erzähl doch mal wie, für all die Leute die das gleiche Problem haben (Haben werden) :)
|
Re: Konsole nachproggen - kleine Schwierigkeiten
eigentlich hat sich das ganze mit dem Demo von Duffy erledigt. Das Problem lag bei den Parametern...
|
Re: Konsole nachproggen - kleine Schwierigkeiten
Hallo Chimaira,
Zitat:
Der FTP wird mit
Code:
gestartet.
C:\WINDOWS\system32\ftp.exe –s:"Laufwerk:\Pfad\FTPCommands.dat"
Die Parameterdatei "FTPCommands.dat" hat dann folgenden Inhalt
Code:
so könnte es gehen …
open FTPSERVER
User Password Account <-- falls nötig get <-- put, del etc. Remote_FileName Local_FileName bye bye Claus |
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:12 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