Hi, Would you please stop generate a debug file for wince lclproc.pas line 1695
procedure DebugLn(const s: string); begin {$ifdef WinCE} if DebugNestAtBOL and (s <> '') then DbgAppendToFile(ExtractFilePath(ParamStr(0)) + Str_LCL_Debug_File, DebugNestPrefix+s) else DbgAppendToFile(ExtractFilePath(ParamStr(0)) + Str_LCL_Debug_File, s); {$else} // First of all verify if a widgetset has override DebugLn if DebugLnProc <> nil then begin DebugLnProc(s); Exit; end; -- I am using last revision of Lazarus, FPC 2.6 on Windows XP SP3 Best Regards Zaher Dirkey
-- _______________________________________________ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus