Delphi
文章平均质量分 63
IT^V^游侠
寻找生命的意义,人活着需要有信仰和梦想,不然和咸鱼有什么区别。
事者,生于虑,成于务,失于傲。
展开
-
Delphi时间戳Unix转换DateTimeToUnix和UnixToDateTime
Delphi时间戳Unix转换DateTimeToUnix和UnixToDateTime原创 2022-07-24 11:12:13 · 1567 阅读 · 0 评论 -
冒泡算法的例子
procedure TForm1.BaseMaoPao;var Temp:Integer; a:array[0..9] of Integer; i,j,times:integer; Str:string;begin a[0]:=9; a[1]:=6; a[2]:=4; a[3]:=2; a[4]:=5; a[5]:=1; a原创 2015-03-15 15:16:50 · 473 阅读 · 0 评论 -
Delphi的DataSource事件
Delphi的DataSource事件 procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField); //数据源记录移动触发 beginend;procedure TForm1.DataSource1StateChange(Sender: TObject); //时刻监视着数据源的状态 var s:String;原创 2015-06-29 18:09:03 · 1936 阅读 · 0 评论 -
delphi2010 调用webservice
一、Delphi做客户端调用asp.net web service 步骤1. 新建一个vcl工程 步骤2.文件-新建-webservice-WSDLImporter 图1 图2 注意:URL格式为:http://IP:端口号/?wsdl 图3 按默认设置 图4 这里也按默认设置然后直接next-finish,然后系统会自动生成一个webservice文件,把此文件uses添加原创 2015-06-30 12:45:29 · 772 阅读 · 0 评论 -
Delphi的in循环
今天无意中看到了一篇文章里面提起到了for in do 循环,之前没有用过的方法。一、遍历 TStrings var List: TStrings; s: string; begin List := TStringList.Create; List.CommaText := ‘aaa,bbb,ccc’;for s in List do ShowMessage(s转载 2015-07-12 14:54:54 · 1338 阅读 · 0 评论 -
DELPHI ClientData使用详解
转自http://hi.baidu.com/%B6%C0%C7%E9%B1%F9%D0%C4/blog/item/de918639d9fde2ff55e723fa.html 在三层结构中,TClientDataSet的地位是不可估量的,她的使用正确与否,是十分关键的, 本文从以下几个方面阐述她的使用,希望对你有所帮助. 1.动态索引 procedure TForm1.DBGrid1Title转载 2015-08-12 17:10:21 · 1576 阅读 · 0 评论 -
Delphi2010开发DataSnap服务器(一)
今天简单的研究了一下Delphi开发DataSnap服务器,以下是简单的例子,各位见笑了。 第一步创建一个DataSnap Server 这里选择默认 选择好了以后这里生成3个文件,我将这3个文件重新命名。 来到TServerMethods这个文件里面的代码页,我们添加一个方法 GetMessage。 function TServerMethods.GetMessage(Us原创 2016-12-04 16:13:29 · 5192 阅读 · 0 评论 -
Delphi下的ShellExecute使用
ShellExecute使用 函数原型 function ShellExecute(hWnd: HWND; Operation, FileName, Parameters, Directory: PWideChar; ShowCmd: Integer): HINST; stdcall; 参数说明: hwnd 窗口的句柄 lpOperation 进行的操作,如”open”,”pri原创 2017-04-16 12:01:33 · 4493 阅读 · 0 评论