摘要： http://www.west263.com/info/html/chengxusheji/delphi/20080410/61094_11.html { If font was assigned, changing it back to default may affect grid titleheight, and title height changes require layout and... 阅读全文

摘要： 转为字符串的函数： where To_Char(ZXRQ,''yyyy-mm-dd'')='+Quotedstr(str1) 阅读全文

摘要： unit u_main;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdFTP, C... 阅读全文

摘要： Delphi中关于文件、目录操作的函数 Delphi中关于文件、目录操作的函数 来源：大富翁 关于文件、目录操作 Chdir('c:\abcdir'); // 转到目录Mkdir('dirname'); //建立目录Rmdir('dirname'); //删除目录GetCurrentDir; //取当前目录名，无'\'Getdir(0,s); //取工作目录名s:='c:\abcdir';D... 阅读全文

摘要： [Delphi]CopyFile函數詳解 2007-07-20 15:41:40| 分类： 学习 | 标签： |字号大中小 订阅 今天在翻以前的delphi筆記的時候看到了這個函數的使用,但是記錄的很少.以前好像沒怎么用過這個函數.所以就想來試試.到網上去搜這個函數的詳解,竟然沒有找到.所以,自己今天在test的時候,順便把這個函數的基本使用方法給記錄下.方便以后再用,也方便和我一樣的菜鳥們學習.... 阅读全文

摘要： unit GetMM;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,IdTCPClient, IdHTTP;constUrl='[url]ht... 阅读全文

摘要： procedureTForm1.Button2Click(Sender:TObject);varMyStream:TMemoryStream;beginIdAntiFreeze1.OnlyWhenIdle:=False;//设置使程序有反应. MyStream:=TMemoryStream.Create;try//下载我站点的一个ZIP文件IdHTTP1.Get('http://www.138so... 阅读全文

摘要： function hdcService(head,body,msg,resultdata:PChar):Integer;stdcall;external 'hdcv1.dll'; //申明从hdcv1.dll中调用函数hdcservice函数，该函数包括4个参数，其中head和body是传入的xml头部分和主体部分，msg是返回的提示信息， //resultdata是返回的结果。procedure... 阅读全文

摘要： [代码] 阅读全文

摘要： 利用TypInfo单元的GetEnumName和GetEnumValue可以遍历任意枚举类型，并获取其名称和值。下面是示例Demo。 procedure TForm1.btnTestClick(Sender: TObject);var p: PTypeData; i: Integer; s: String; pt: PTypeInfo;begin ListBox1.Items.Clear; pt... 阅读全文