paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-08 14:35:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazutils: fixed another compilation for debug log with wince.

Browse Source 
git-svn-id: trunk@35262 -
This commit is contained in:
vincents 2012-02-09 08:59:40 +00:00
parent 75005d5347
commit 1cbef20c34
2 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/lazutils/lazlogger.pas
View File

@ -199,6 +199,11 @@ property DebugLogger: TLazLogger read GetDebugLogger write SetDebugLogger;
implementation implementation
{$ifdef wince}
const
Str_LCL_Debug_File = 'lcldebug.log';
{$endif}
var var
TheLazLogger: TLazLogger = nil; TheLazLogger: TLazLogger = nil;

2
lcl/lclproc.pas
View File

@ -421,7 +421,9 @@ implementation
uses gettext; uses gettext;
const const
{$IFDEF WithOldDebugln}
Str_LCL_Debug_File = 'lcldebug.log'; Str_LCL_Debug_File = 'lcldebug.log';
{$ENDIF}
UNKNOWN_VK_PREFIX = 'Word('''; UNKNOWN_VK_PREFIX = 'Word(''';
UNKNOWN_VK_POSTFIX = ''')'; UNKNOWN_VK_POSTFIX = ''')';