上一页 1 ··· 4 5 6 7 8 9 10 11 12 ··· 24 下一页
摘要: Delphi获取公网IP地址函数1usesIdHTTP;2functionGetPublicIP:string;3var4strIP,URL:string;5iStart,iEnd:Integer;6MyIdHTTP:TIdHTTP;7begin8Result:='';9MyIdHTTP:=TIdHTTP.Create(nil);10try11try12URL:=MyIdHTTP.Get('http://www.ip138.com/ip2city.asp');13except14end;15finally16MyIdHTTP.Free;17end;1819ifL 阅读全文
posted @ 2011-07-25 11:37 许明吉博客 阅读(4395) 评论(0) 推荐(0) 编辑
摘要: TMyData = record id:Integer; Name:Array[0..20] of Char; Sex:Array[0..10] of Char; Age:Byte; Address:Array[0..256] of Char; UpdateTime:double; end;//发送结构体:procedure TForm2.Button2Click(Sender: TObject);var SendData:TMyData;beginSendData.ID:=10;StrPCopy(SendData.Name,'Wyatt');StrPCopy(SendData 阅读全文
posted @ 2011-07-23 16:55 许明吉博客 阅读(2117) 评论(0) 推荐(0) 编辑
摘要: Shortcut to winsiggen.exe 阅读全文
posted @ 2011-07-22 17:33 许明吉博客 阅读(786) 评论(0) 推荐(0) 编辑
摘要: 编辑器加载中...在空白窗体上添加 PopupMenu1, 并添加几个测试用的菜单项, 分别命名为: m1、m2、m3、mCn、mBig、mEn;激活 mCn 的 OnClick 事件和窗体的 OnCreate 事件.unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Menus;type TForm1 = class(TForm) PopupMenu1: TPopupMenu; m1: TMenuItem; 阅读全文
posted @ 2011-07-22 17:14 许明吉博客 阅读(502) 评论(1) 推荐(0) 编辑
摘要: Delphi组件安装工具 DelphiPIhttp://www.oschina.net/p/delphipiDelphiPI 是一个用于安装delphi组件的工具,DelphiPI 自动解决bpl包之间的依赖关系,并且编译,安装和添加目录到delphi IDE上。 阅读全文
posted @ 2011-07-22 16:50 许明吉博客 阅读(930) 评论(0) 推荐(0) 编辑
摘要: Component->Install packages...->Add... 安装 dcloffice2k140.bpl 即可。(dcloffice2k140.bpl 位于 C:\Program Files\Embarcadero\RAD Studio\7.0\bin) 阅读全文
posted @ 2011-07-22 13:58 许明吉博客 阅读(1844) 评论(0) 推荐(0) 编辑
摘要: 在微软中国找到了一个官方的说法------不建议将DataSet直接作为返回值传送,因为里面含有大量复杂的schema以及更改等信息,大部分非.NET语言在解析上有困难。建议使用DataSet.WriteXML方法将简化后的XML版本作为一个WideString回传。经过试验,已经在Delphi下轻松通过,Delphi中还需要使用XML Mapper工具事先生成Transfomation(XTR)文件。 Delphi7客户端代码 ----------------------------------------------------------------------------------- 阅读全文
posted @ 2011-07-22 11:22 许明吉博客 阅读(3844) 评论(0) 推荐(0) 编辑
摘要: http://webservice.webxml.com.cn/WebServices/WeatherWS.asmx可以试着用delphi调用啊 阅读全文
posted @ 2011-07-22 10:03 许明吉博客 阅读(1325) 评论(0) 推荐(0) 编辑
摘要: delphi 播放 GIF 动画 阅读全文
posted @ 2011-07-22 09:44 许明吉博客 阅读(1562) 评论(0) 推荐(0) 编辑
摘要: using System;using System.Collections;using System.ComponentModel;using System.Data;using System.Diagnostics;using System.Web;using System.Web.Services;using System.Web.UI;using System.Web.UI.WebControls;using System.Web.UI.HtmlControls;using System.Management;using System.Net;using System.Runtime.I 阅读全文
posted @ 2011-07-21 18:03 许明吉博客 阅读(1773) 评论(0) 推荐(0) 编辑
上一页 1 ··· 4 5 6 7 8 9 10 11 12 ··· 24 下一页