paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-26 11:28:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

create debugger without console.

Browse Source 
git-svn-id: trunk@6268 -
This commit is contained in:
vincents 2004-11-19 12:18:50 +00:00
parent f74a3ccbeb
commit ab6de4e43d
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
debugger/cmdlinedebugger.pp
View File

@ -216,7 +216,9 @@ begin
then begin then begin
FDbgProcess := TProcess.Create(nil); FDbgProcess := TProcess.Create(nil);
FDbgProcess.CommandLine := ExternalDebugger + ' ' + AOptions; FDbgProcess.CommandLine := ExternalDebugger + ' ' + AOptions;
FDbgProcess.Options:= [poUsePipes, {poNoConsole,} poStdErrToOutPut, poNewProcessGroup]; // TODO: under win9x and winMe should be created with console,
// otherwise no break can be sent.
FDbgProcess.Options:= [poUsePipes, poNoConsole, poStdErrToOutPut, poNewProcessGroup];
FDbgProcess.ShowWindow := swoNone; FDbgProcess.ShowWindow := swoNone;
FDbgProcess.Environment := DebuggerEnvironment; FDbgProcess.Environment := DebuggerEnvironment;
end; end;
@ -401,6 +403,9 @@ initialization
end. end.
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.38 2004/11/19 12:18:50 vincents
create debugger without console.
Revision 1.37 2004/11/02 23:25:02 marc Revision 1.37 2004/11/02 23:25:02 marc
* Introduced another method of interrupting gdb on win32 * Introduced another method of interrupting gdb on win32