use comobj; procedure TForm1.Button3Click(Sender: TObject); var
原创
2009-05-27 16:24:23
548阅读
点赞
1评论
一、Rave介绍RAVE (Report Authoring Visual Environment) 是一个可视化的报表设计器。它本身是一个第三方报表软件，目前的版本是Rave5.0，由于其简单、易用和强大的功能被Delphi引入，并集成在Delphi7中。 Rave报表设计器简介 Rave有自己的可视报表设计器，以自己的文件格式保存报表，扩展名为(.RAV)。启动报表生成器的方式有两种：（１）
XML文档是新一代的Web数据格式。它可以用树的形式储存一切数据。下面介绍一下TXMLDocument控件的一些用法：已定义：XMLDoc: TXMLDocument;EncoderMIME: TIdEncoderMIME;DecoderMIME: TIdDecoderMIME;xn:IXMLNod Read More
转载
2016-02-23 18:58:00
49阅读
2评论
1.新建一个web工程,请选中最下面一项：Web App Debugger executable，Coclass name我
原创
2023-04-11 08:31:36
119阅读
Diesel，Rudolf，1858-1913，德国工程师，所谓的DIESEL的发明者。“Dumb Interpretively Evaluated String Expression Language”的缩写，AutoCAD和AutoCAD LT中的简单编程语言AutoCAD附带了大量API（应用程序编程接口），可以使用LISP，VBA或C ++等语言构建自定义环境。在AutoCAD的第12版中
转载
2023-06-30 22:36:17
77阅读
function SHAutoComplete(hwndEdit: HWnd; dwFlags: DWORD): HResult; stdcall; external 'Shlwapi.dll';procedure TForm1.FormCreate(Sender: TObject);begin SHAutoComplete(Edit1.Handle,0);end; &nbs
原创
2023-01-13 19:45:21
100阅读
好一段时间没有用 Delphi6了，今天在打开一个工程的时候竟然反复提示要注册。就算是用Kg提供的SN与激活方法都失败了，除了提示注册失败还是失败，郁闷。。。折腾了半天，后面找到注册表：[HKEY_CURRENT_USER/Software/Borland/Delphi/6.0]删除下面的 "LM" 键后，再打开 Delphi6，竟然全好了，哇哈哈...
原创
2023-01-30 14:41:59
104阅读
好一段时间没有用 Delphi6了，今天在打开一个工程的时候竟然反复提示要注册。就算是用Kg提供的SN与激活方法都失败了，除了提示注册失败还是失败，郁闷。。。折腾了半天，后面找到注册表：[HKEY_CURRENT_USER/Software/Borland/Delphi/6.0]删除下面的 "LM" 键后，再打开 Delphi6，竟然全好了，哇哈哈...
转载
2009-08-13 17:22:00
110阅读
2评论
Delphi调用JavaScript解析Json
1.首先加入ComObj单元
2.加入函数
转载
2011-07-08 20:13:00
230阅读
2评论
>首部 function FormatFloat(const Format: string; Value: Extended): string; $[SysUtils.pas功能 返回浮点数类型以指定格式字符串Format转换成字符串说明 FormatFloat(',.00', 1234567890) = '1,234,567,890.00'参考 function SysUtils...
转载
2005-03-21 17:02:00
77阅读
2评论
>首部 function Languages: TLanguages; $[SysUtils.pas功能 返回系统语言对象说明 通过此函数可以得到系统的语言环境参考 type SysUtils.TLanguages例子 ///////Begin Languagesprocedure TForm1.Button1Click(Sender: TObject);varI: Integer;beginMe...
转载
2005-03-21 16:55:00
25阅读
2评论
>首部 function FindNext(var F: TSearchRec): Integer; $[SysUtils.pas功能 返回继续文件搜索说明 搜索成功则返回0参考 function Windows.FindNextFile例子 ━━━━━━━━━━━━━━━━━━━━━首部 procedure FindClose(var F: TSearchRec); $[SysUt...
转载
2005-03-21 17:02:00
37阅读
2评论
Controls.pas单元中有一个FindControl函数，通过句柄获得对应的TWinControl对象。 function FindControl(Handle: HWnd): TWinControl;begin Result := nil; if (Handle <> 0) then beg Read More
转载
2017-01-24 23:14:00
81阅读
Android 在 4G 下访问 IPV6 慢的解决方案Android4G ipv6起因今天，用户反馈 Android 端加载数据较慢，经 Android 开发人员排查后，发现在公司 wifi 下接口响应时间在 50ms 左右，而在 4G 网络下，接口响应时间在 600ms 左右，甚至于 1s 以上，Android 端认为是服务端问题，遂反馈到服务端排查首先检查 nginx 日志，发现不管是 wi
转载
2023-06-14 15:40:49
66阅读
JSON(JavaScript Object Notation) 是一种轻量级的数据交换格式。易于人阅读和编写，同时也易于机器解析和生成。它基于JavaScript（Standard ECMA-262 3rd Edition - December 1999）的一个子集。 JSON采用完全独立于语言的文本格式，但是也使用了类似于C语言家族的习惯（包括C, C++, C#, Java, JavaScript, Perl, Python等）。这些特性使JSON成为理想的数据交换语言。
转载
2011-06-03 19:57:00
529阅读
2评论
json，System.JSON,REST.JSON
JSON有两种数据结构，对象和数组。
对象在js中表示为“{}”括起来的内容，数据结构为 {key：value,key：value,...}
数组在js中是中括号“[]”括起来的内容，数据结构为 ["java","javascript","vb",...]
{"NAME":"DVAD","SEX":"MAN","AGE":12}
{"suc
转载
2014-09-23 17:28:00
261阅读
一直盼着 Delphi 能够直接支持 "正则表达式" 与 "JSON";Delphi 2009 刚来的时候, 有了 JSON, 但不好, 那时尝试过一点. 这是以前的链接: 什么是 JSON?Delphi 2010 带了两个相关单元: DBXJSON、DBXJSONReflect 貌似很强大, 但主要是给 DataSnap 准备的; 尝试了半天, 也很失望:
转载
精选
2013-09-10 20:58:35
967阅读
1 dcom程序不能使用的问题（也许有用） 客户端需要运行regsvr32 midas.dll，regsvr32 stdvcl40.dll 服务端需要运行dcomcnfg进入“分布式COM配置属性” 1 “默认属性”页面，将“在这台计算机上启用分布式COM”打勾，将“默认身份验证级别”改为“无”
原创
2023-07-20 15:14:03
48阅读
用Ole Automation实现Delphi和AutoCad之间的数据交换 广州 XD.W Aut
转载
2023-09-05 12:20:08
88阅读
&nbs
转载
2023-06-05 19:21:35
144阅读
