| | | |

2015年7月26日

摘要：如果报表复杂，可以利用cxSpreadSheetBook电子表格控件来生成报表。下面例子是装载数据同时设置电子表格格式：procedure TAO_RepShowData.LoadRepData;var CurCursor: TCursor;begin CurCursor := Screen.Cur... 阅读全文

posted @ 2015-07-26 10:48 火山白水的DELPHI 阅读(925) 评论(0) 推荐(0)

判断Vaule是不是数字

摘要： function IsNumberic(Vaule:String):Boolean; //判断Vaule是不是数字vari:integer;beginresult:=true; //设置返回值为是（真）Vaule:=trim(Vaule); //去空格 for i:=1 to length(Vau... 阅读全文

posted @ 2015-07-26 10:09 火山白水的DELPHI 阅读(520) 评论(0) 推荐(0)