关于PChar和String的转换
摘要: 1、PChar到string的转换可直接赋值,如:X: string;Y: PChar;X := '1';Y := '2';X := Y; // X=22、string到PChar的转换一般情况下都可以用PChar('')来强制转换Y: PChar;Y := PChar('2'); //强制转换。但有些情况下如果强制转换,会有字符被截取,结果不完整,如:functionReplaceString(...
阅读全文
posted @
2008-06-16 10:43 sonicit 阅读(3212) |
评论 (0) 编辑
FastReport打印空行
摘要: varPageLine:integer;//现在打印到第几行PageMaxRow:integer=15;//空行行数procedureMasterData1OnBeforePrint(Sender:TfrxComponent);beginPageLine:=<Line>modPageMaxRow;if(PageLine=1)and(<line>>1)thenEngin...
阅读全文
posted @
2008-06-11 16:27 sonicit 阅读(1376) |
评论 (4) 编辑