- 博客(9)
- 收藏
- 关注
原创 Delphi 调用Java WebService 传入参数为空
把引入WSDL生成的pas文件末尾,红色字体注释掉即可。initialization InvRegistry.RegisterInterface(TypeInfo(******Service), 'http://service.******.cn/', 'UTF-8'); InvRegistry.RegisterDefaultSOAPAction(TypeInfo(******Service), ''); //InvRegistry.RegisterInvokeOptions(TypeInf...
2021-09-13 17:43:36
358
原创 Flutter App Run卡在Running Gradle task 'assembleDebug'...
Flutter App Run卡在Running Gradle task 'assembleDebug'...
2020-04-08 14:25:21
67170
24
原创 Delphi2010使用QQ邮箱发送邮件
最近在编写小程序 ,现在需要将生成的结果以电子邮件的方式发送到指定邮箱里,功能已正常实现,在这里将设置做一下记录,时间一长就容易忘!开发工具:Delphi2010邮箱:QQ邮箱一、 首先在QQ邮箱里设置, 登录邮箱后进入设置二、进入账户三、找到POP3/IMAP/SMTP/Exchange/CardDAV/CalDAV服务1、将POP3/SMTP服务和IMAP/SMTP服务设置成已...
2020-03-29 20:00:44
1398
2
原创 关于Windows10的KB4489907补丁
4月8日,更新了KB4489907安全补丁,电脑使用开始变慢,一开始不知道问题在哪儿,开始找各种系统优化,问题依然没有解决,最后准备重做系统了,想起来最近更新了补丁,于是卸载了补丁,电脑反应慢的问题解决了。这个补丁是Adobe Flash的补丁。...
2019-04-09 17:15:25
483
原创 Delphi 2010 调用WebService接口
Delphi 调用WebService接口此测试程序使用Delphi2010编写打开Delphi2010一、File-> New-> Application 新建一个工程在窗体上放置三个 Button按钮,一个ComboBox,两个Edit, 一个Memo和一个HTTPRIO二、到File-> New-> Other-> WebService...
2018-12-22 16:00:28
1914
1
转载 Delphi2010 Edit即制内容输入
ifnot(CharInSet(Key,['0'..'9',#8])) thenkey:=#0; //数字ifnot(CharInSet(Key,['a'..'z',#8])) thenkey:=#0; //小写字母ifnot(CharInSet(Key,['A'..'Z',#8])) thenkey:=#0; //大写字母if (key = '.'...
2018-11-27 17:03:50
337
原创 Delphi2010 设置断点无效的问题
断点无效的问题一直困扰着,今天再次查找了资料,找到原来是一项设置的问题 project -> option -> Delphi compiler -> linking -> Debug information 将这项设置设为True即可。...
2018-11-18 17:52:42
2190
2
原创 Delphi2010连接Sqlite数据库,使用相对路径
Delphi2010 安装UniDAC4.0控件,优快云里有sqlite3.dll 可从官网(https://www.sqlite.org/index.html)下载 location := ExtractFileDir(ParamStr(0)) + '\'; conSqlite.ProviderName := 'SQLite'; conSqlite.Dat...
2018-11-14 15:16:15
1828
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人