mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 13:49:34 +01:00 
			
		
		
		
	MG: activated environment opts in debugger
git-svn-id: trunk@3256 -
This commit is contained in:
		
							parent
							
								
									cae607e7fd
								
							
						
					
					
						commit
						fa11d46a46
					
				@ -173,7 +173,7 @@ begin
 | 
				
			|||||||
    FDbgProcess.CommandLine := ExternalDebugger + ' ' + AOptions;
 | 
					    FDbgProcess.CommandLine := ExternalDebugger + ' ' + AOptions;
 | 
				
			||||||
    FDbgProcess.Options:= [poUsePipes, poNoConsole, poStdErrToOutPut];
 | 
					    FDbgProcess.Options:= [poUsePipes, poNoConsole, poStdErrToOutPut];
 | 
				
			||||||
    FDbgProcess.ShowWindow := swoNone;
 | 
					    FDbgProcess.ShowWindow := swoNone;
 | 
				
			||||||
    //FDbgProcess.Environment:=Environment;
 | 
					    FDbgProcess.Environment:=Environment;
 | 
				
			||||||
  end;
 | 
					  end;
 | 
				
			||||||
  if not FDbgProcess.Running 
 | 
					  if not FDbgProcess.Running 
 | 
				
			||||||
  then begin
 | 
					  then begin
 | 
				
			||||||
@ -362,6 +362,9 @@ end;
 | 
				
			|||||||
end.
 | 
					end.
 | 
				
			||||||
{ =============================================================================
 | 
					{ =============================================================================
 | 
				
			||||||
  $Log$
 | 
					  $Log$
 | 
				
			||||||
 | 
					  Revision 1.13  2002/08/28 11:41:52  lazarus
 | 
				
			||||||
 | 
					  MG: activated environment opts in debugger
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  Revision 1.12  2002/08/28 10:44:44  lazarus
 | 
					  Revision 1.12  2002/08/28 10:44:44  lazarus
 | 
				
			||||||
  MG: implemented run param environment variables
 | 
					  MG: implemented run param environment variables
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
		Reference in New Issue
	
	Block a user