Type
   Line:Array[0..127] of Char;

Var
   TmpBugStr:Line;

{later in the code}
Const
   TempString : PChar = TmpBugStr;
_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to