- 博客(30)
- 资源 (7)
- 收藏
- 关注
RSS订阅原创 Delphi 7 IdHTTP POST 中文乱码得解决
WEB后台使用UTF-8进行编码，由于D7默认是ansiString，直接提交到后台会使中文乱码。2.通过System单元中的ansitoUTF8()函数进行转换之后在提交就可以了。1.先把AnsiString转WideString。
2024-01-26 09:52:37
675
转载 滚动到指定元素
Element. scrollIntoView()element.scrollIntoView(); // 支持一个参数，默认为trueelement.scrollIntoView(true); // 滚动到目标元素顶部element.scrollIntoView(false); // 滚动到目标元素底部作者：汤姆威廉斯链接：https://www.jianshu.com/p/e431723da871来源：简书著作权归作者所有。商业转载请联系作者获得授权，非商业转载请注
2021-12-06 15:32:25
228
原创 MacOS 设置Java环境变量
sudo vim /etc/profileJAVA_HOME="/Library/Java/JavaVirtualMachines/jdk1.8.0_202.jdk/Contents/Home"export JAVA_HOMECLASS_PATH="$JAVA_HOME/lib"PATH=".$PATH:$JAVA_HOME/bin"
2021-10-25 16:22:58
172
原创 SpringBoot下用Quartz实现动态配置定时任务
相关概念就不介绍了，直接上代码。pom.xml配置 <dependency> <groupId>org.quartz-scheduler</groupId> <artifactId>quartz</artifactId> <version>2.3.0</version> </dependency>
2021-09-11 12:20:47
347
原创 python3.8在Pycharm中配置pyqt5
1.首先用Pycharm创建一个python项目2.安装pyqt52.1 在项目中安装pyqt5File->settings>project:projectName->Python interpreter->+->搜索pyqt5->安装2.2 添加ui设计工具有两种方式，一种是用本项目中的。一种是用python目录下的。2.2.1 在本项目中的需要在上面步骤中安装，pyqt5-tools模块。2.2.2 用python目录中...
2021-08-26 15:11:42
605
原创 最快的Python HTTP客户端/服务器框架
Vibora代表葡萄牙语的viper，它是一个异步的客户端/服务器框架，要成为最快的Python HTTP客户端/服务器框架，支持Python 3.6+以上版本！该框架效率高，性能好。它的API灵感来自Flask，而其内置功能基于众多著名的库，如jinja2，marshmallow，aaugustin的websockets，werkzeug等等。官方地址GitHub地址...
2021-08-25 10:50:34
413
原创 浅度测评：requests、aiohttp、httpx
在 Python 众多的 HTTP 客户端中，最有名的莫过于requests、aiohttp和httpx。在不借助其他第三方库的情况下，requests只能发送同步请求；aiohttp只能发送异步请求；httpx既能发送同步请求，又能发送异步请求。原文地址...
2021-08-25 10:34:51
181
原创 IBM SPSS的Sav文件读/写
本文只要介绍通过IBM提供的库读/写sav文件格式。在github上有.net版本和python版本，本文主要介绍用C读写sav文件。参考文档：Input-Output Module.pdf,该文档为IBM官方文档，在文档第5部分【I/OModuleprocedurereference】中有描述接口的详细参数和使用，有些还有示例，示例是C语言的。通过上述文档就可以完成读写sav文件的功能，此文介绍引用相关包和环境，以便让示例可以跑起来。1. 需要的动态库2. 需要的头文件3.
2021-08-24 17:07:44
2787
转载 查询数据中所有视图名称及内容
SELECTName,--视图名字Definition --视图内容FROM sys.sql_modules AS m INNER JOIN sys.all_objects AS o ON m.object_id = o.object_idWHERE o.[type] = 'v' and name like '%pre%' or name like '%post%'order by name
2021-01-31 12:27:08
1262
原创 CxGrid列加入ComboBox方法
Cxgrid的列属性Properties为comboBox,实现动态添加item方法：(cxGrid1DBTableView1Column1.Properties as TcxComboBoxProperties).items.add("itemName");或者TcxComboboxProperties(cxGrid1DBTableView1Column1.Properties).Items.Add('aa');TcxComboboxProperties(cxGrid1DBTableView1C
2021-01-28 15:47:02
595
原创 QT多语言
QT自己提供了一种国际化方案，而不是采用INI配置文件的方式，在QT中提供了tr()函数，而翻译好后的资源以“.qm”命名。概念通常在QT中利用QString()、QTranslator等类和tr()函数能够很好的完成加入国际化的支持，具体如下：1.使用QString对象表示所有用户可见的文本。2.使用tr()函数获取所有需要翻译的文本，在Qt的翻译机制下，QObject::tr()函数可以获取翻译之后的文本。3.利用QTranslator::load()和QcoreApplicatio
2021-01-27 19:54:12
2529
原创 tcxGrid设置分组及分组展开收缩
分组设置1. 设置列的GroupIndex，即可分组2. 把列拖到groupbox同样可以实现分组。展开方法一：cxGrid1DBTableView1.DataController.Groups.FullExpand;方法二：cxGrid1DBTableView1.ViewData.Expand(true);收缩方法一：cxGrid1DBTableView1.DataController.Groups.FullCollapse;方法二：cxGrid1DBTableView1.
2020-11-26 12:27:49
866
转载 Delphi 快速检测是否联网
use WinInet; //正确检测是否在线方法 if InternetGetConnectedState(nil, 0) then begin Self.Caption := '在线'; end else begin Self.Caption := '脱机'; end;经测试，和QQ检测是否在线基本相同。
2020-10-29 10:32:03
444
原创 delphi 关于 `addobject` 字符串的使用
delphi 关于 addobject 字符串的使用procedure TForm1.Button1Click(Sender: TObject);begin cbb1.Items.Clear; cbb1.Items.AddObject('Iteam2',TObject(NewStr('a1'))); cbb1.Items.AddObject('Iteam2',TObject(NewStr('a2'))); end;procedure TForm1.Button1Click(Sender: T
2020-07-23 15:13:25
435
原创 Delphi UAC生成默认以管理员身份运行的可执行程序
步骤1.建立UAC.manifest文件<?xml version="1.0" encoding="UTF-8" standalone="yes"?><assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"><trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"><security><requestedPri
2020-07-17 15:18:02
1232
转载 调用api弹出打印机属性对话框
调用api弹出打印机属性对话框特别备注：需要引用单元 winspoolAuthor:vitoriatangFrom:Internet.NETFramework封装了很多关于打印的对话框，比如说PrintDialog,PageSetupDialog.但是有的时候我们还需要关心打印机属性对话框，那么就可以调用API来解决这个问题。有几个API函数与之相关PrinterPropertiesDocumentPropertiesOpenPrinterClosePrinter逐一介绍print
2020-07-15 15:50:38
573
原创 Delphi访问基于LDAP的Active Directory
1.创建单元ActiveDs_TLB.pasD7中的创建步骤：Component->Import ActiveX Control2.
2020-04-10 11:14:49
1056
原创 Chromium 文件下载
Chromium 文件下载1.下载在onBeforeDownload事件中添加如下语句：callback.Cont(ExtractFilePath(ParamStr(0)) + suggestedName, True);最后一个参数，true显示保存对话窗口；false 不显示保存对话窗口。2.进度显示在onDownloadUpdated事件中添加如下语句：procedure TFo...
2020-02-21 11:21:21
973
转载 SQL Server 锁表、查询被锁表、解锁相关语句
--锁表（其它事务不能读、更新、删除）BEGIN TRANSELECT * FROM <表名> WITH(TABLOCKX);WAITFOR delay '00:00:20'COMMIT TRAN--锁表（其它事务只能读，不能更新、删除）BEGIN TRANSELECT * FROM <表名> WITH(HOLDLOCK);WAITFOR delay ...
2019-06-27 17:20:05
676
转载 DELPHI 字符串与日期格式互转
procedure TForm1.Button1Click(Sender: TObject);var D:TDateTime; s:string;begin D:=VarToDateTime('05-10-14 04:35PM'); S:=FormatDatetime('YYYY/MM/DD HH:MM:SS',D); showmessage(s);end;看到有人...
2019-06-19 15:25:06
3707
原创 TChromium使用，在D7和XE10上
D71.控件下载，GitHub：https://github.com/hgourvest/dcef32.运行环境：D7 的运行环境在Bin目录下XE101.控件下载，GitHub:https://github.com/salvadordf/CEF4Delphi2.控件安装，介绍地址：http://blog.csdn.net/wnjnfn/article/details/669731093.运行环境...
2018-03-16 11:30:40
2763
1
转载 Delphi IDHTTP控件：GET/POST 请求
Delphi IDHTTP控件：GET/POST 请求最近一直在使用IDHTTP，下面是一些关于 GET、POST 请求基本使用方法的代码一、GET 请求 1 procedure GetDemo; 2 var 3 IdHttp : TIdHTTP; 4 Url : string;//请求地址 5 ResponseStream : TStrin
2017-11-24 13:18:01
2178
原创 SQL server 创建登录名
1.删除指定数据库下所有表use mastergoDECLARE MyCursor cursor for select 'drop table ['+name +']; ' from sys.tables where type = 'u' open MyCursordeclare @SQL varchar(200)fetch next from MyC
2017-06-14 14:11:40
800
转载 Delphi 日期格式转换
procedure TForm1.Button1Click(Sender: TObject);var sTime: TDateTime; s1: String; aDateTimeFormat: TFormatSettings;begin //设定转换格式 DateSeparator aDateTimeFormat.DateSeparator := '-';
2017-04-12 15:23:32
2113
转载 delphi xe 解析复杂json
最简单的JSON大致像这样{ "date":"周二(今天, 实时：12℃)", "dayPictureUrl":"http://api.map.baidu.com/images/weather/day/duoyun.png", "nightPictureUrl":"http://api.map.baidu.com/images/weat
2017-04-11 17:18:45
5888
转载 idhttp get 中文出现乱码的问题
idhttp get 中文出现乱码的问题默认是按系统指定locale（CP_ACP）输出的，简体中文系统默认的是gb18030（虽然名义上是gb2312的代码页）。但是indy只对utf-8的编码进行了处理，所以其他编码只能自己想办法处理了，比如这样：Delphi(Pascal) codevar ss : TStringStream;begin ss
2017-04-11 16:24:42
3770
原创 使用谷歌内核TChromium入门
Delphi 10.1 使用谷歌内核TChromium入门CEF4Delphi的下载和安装Demo运行调试Delphi 101 使用谷歌内核TChromium入门描述CEF4Delphi的下载和安装Demo运行调试描述用Delphi开发工具调用谷歌内核完成浏览器开发环境搭建。这里主要记录各个环节及参考地址，由于很多地址需要VPN才能访问，在这里做转述并附上原文地址。使用CEF4Delp
2017-03-27 16:31:17
9449
转载 欢迎使用CSDN-markdown编辑器
欢迎使用Markdown编辑器写博客本Markdown编辑器使用StackEdit修改而来，用它写博客，将会带来全新的体验哦：Markdown和扩展Markdown简洁的语法代码块高亮图片链接和图片上传LaTex数学公式UML序列图和流程图离线写博客导入导出Markdown文件丰富的快捷键快捷键加粗 Ctrl + B 斜体 Ctrl + I 引用 Ctrl
2017-03-27 11:40:00
161
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人