yangxk666的专栏

 procedure TBaseClass.SelectBmp(Aimage: TImage);var  x,y : Integer;  P : PByteArray;begin    with Aimage.Picture.Bitmap do    begin      for y := 0 to Height -1 do      begin        P := ScanLine[y]

<br />function Format(const Format: string; const Args: array of const): string; $[SysUtils.pas<br />功能：返回按指定方式格式化一个数组常量的字符形式<br />说明 这个函数是Delphi中用得最多的函数，现在就列举几个例子以得到直观的理解<br />"%" [索引 ":"] ["-"] [宽度] ["." 摘要] 类型<br />它是以"%"开始,而以"类型"结束，"类型"表示一个具体的类型。中间是用来格

<br />一、Delphi程序启动Word<br />采用CreateOleObjects的方法来启动Word，调用VBA代码，具体实现过程为：<br />首先使用GetActiveOleObject('Word.Application')判断当前内存中是否存在Word程序，如果存在，<br />则直接连接，如果没有Word程序，则使用CreateOleObject('Word.Application')启动Word<br />二、Delphi程序新建Word文稿<br />格式：WordDocument

<br />//参数pStrCols 是需要设置为字符串格式的列<br />procedure TXGridLayoutCortrol.ExportData(pTitle:string='';SePTitle:String='';pTail:string='';pStrCols:string='');<br />var<br />i,j:integer;<br />strlist:Tstringlist;<br />str,Filename:string;<br />h,k:integer;<br />