svnpkg: run svn command in hidden window.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@752 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
vsnijders
2009-03-31 16:44:42 +00:00
parent 8adbc8ab54
commit 295f8c4625

View File

@ -92,6 +92,7 @@ begin
try try
SvnProcess.CommandLine := SvnExecutable + ' ' + Command; SvnProcess.CommandLine := SvnExecutable + ' ' + Command;
SvnProcess.Options := [poUsePipes]; SvnProcess.Options := [poUsePipes];
SvnProcess.ShowWindow := swoHIDE;
SvnProcess.Execute; SvnProcess.Execute;
while SvnProcess.Running do begin while SvnProcess.Running do begin
if not ReadOutput then if not ReadOutput then