hidden some variables

This commit is contained in:
Basile Burg 2014-12-01 05:50:25 +01:00
parent 9b45b697a2
commit 43f59512b8
1 changed files with 5 additions and 3 deletions

View File

@ -40,13 +40,15 @@ procedure getHint(const aFilename: string; aPosition: Integer; const list: TStri
procedure getSymbolLoc(var aFilename: string; var aPosition: Integer);
var
DCD_server: TProcess = nil;
DCD_client: TProcess = nil;
lines: TStringList;
dcdOn: boolean;
implementation
var
DCD_server: TProcess = nil;
DCD_client: TProcess = nil;
lines: TStringList;
procedure lazyServerStart;
begin
if not DCD_server.Running then