|
@@ -33,6 +33,10 @@ const
|
|
sLineBreak = LineEnding;
|
|
sLineBreak = LineEnding;
|
|
DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsLF;
|
|
DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsLF;
|
|
|
|
|
|
|
|
+var
|
|
|
|
+ argc: longint;
|
|
|
|
+ argv: PPChar;
|
|
|
|
+
|
|
procedure DebugWrite(const P: PChar);
|
|
procedure DebugWrite(const P: PChar);
|
|
procedure DebugWriteLn(const P: PChar);
|
|
procedure DebugWriteLn(const P: PChar);
|
|
procedure DebugWriteChar(Ch: Char);
|
|
procedure DebugWriteChar(Ch: Char);
|