码农的笔记

Delphi虽好,但已不流行; 博客真好,可以做笔记

博客园 首页 新随笔 联系 订阅 管理

2024年9月10日 #

摘要: 开发环境Delphi XE11.3 仅仅是测试 Unit unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphic 阅读全文
posted @ 2024-09-10 11:15 码农的笔记 阅读(25) 评论(0) 推荐(0) 编辑

2024年8月7日 #

摘要: 开发环境Delphi XE11.3 Unit unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl 阅读全文
posted @ 2024-08-07 09:42 码农的笔记 阅读(26) 评论(0) 推荐(0) 编辑

2024年7月3日 #

摘要: 开发环境DelphiXe11; 这个代码不适用于Delphi7,一般不适用于Delphi2009之前的版本; 这个图片:12个字(汉字)换行;2数字和2字母认为等于1汉字; 这个换行不大行,全是小写的字母占占用的位置比较少,如果要效果好的,请自己写; --Unit-- unit Unit1; int 阅读全文
posted @ 2024-07-03 17:16 码农的笔记 阅读(41) 评论(0) 推荐(0) 编辑

2023年8月7日 #

摘要: 开发环境Delphi Xe11.3 调用的程序 procedure TForm2.Button1Click(Sender: TObject); begin //某个参数包含空格时(用""),如下面这行 ;这里传递过去是3个参数 ShellExecute(handle,'open',pchar( 'C 阅读全文
posted @ 2023-08-07 15:48 码农的笔记 阅读(351) 评论(0) 推荐(0) 编辑

2023年7月31日 #

摘要: 开发环境:DelphiXE11.3 做个笔记 链接1: 链接2 链接1是某位大佬的源码,被俺收藏了; 链接2是本人从链接1中提取一部分,改了一点点东西;(比如下面的代码 fRSAOpenSSL.PublickEncrypt(aRSAData,memPubKey.Text); //公钥加密(公钥是字符 阅读全文
posted @ 2023-07-31 11:18 码农的笔记 阅读(313) 评论(0) 推荐(0) 编辑

2022年12月21日 #

摘要: 开发环境Delphi XE10 1 unit Unit1; 2 3 interface 4 5 uses 6 Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics 阅读全文
posted @ 2022-12-21 18:42 码农的笔记 阅读(170) 评论(0) 推荐(0) 编辑

2022年9月28日 #

摘要: 测试环境SQL Server 2012 select a.definition , b.name,b.is_disabled from sys.sql_modules a inner join sys.triggers b on a.object_id=b.object_id --所有的触发器 se 阅读全文
posted @ 2022-09-28 13:54 码农的笔记 阅读(86) 评论(0) 推荐(0) 编辑

2022年5月27日 #

摘要: 开发环境是Delphi XE10 这里要说的是BUG问题, var respStream : TStringStream; respStream.DataString有问题,中文部分乱码! 解决方法也在代码当中 1 unit u_Main; 2 3 interface 4 5 uses 6 Wina 阅读全文
posted @ 2022-05-27 20:17 码农的笔记 阅读(1263) 评论(0) 推荐(0) 编辑

2022年5月7日 #

摘要: Delphi7中测试idHttpServer,自带的idHttpServer 仅放上测试的部分代码,便于自己查看 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphi 阅读全文
posted @ 2022-05-07 14:14 码农的笔记 阅读(795) 评论(0) 推荐(0) 编辑

2022年5月6日 #

摘要: SQL Server 1.使用row_number分页 declare @PageSize int = 5 declare @PageIndex int = 1 select * from (select ROW_NUMBER() over(order by SId) RowId,Student.* 阅读全文
posted @ 2022-05-06 18:59 码农的笔记 阅读(56) 评论(0) 推荐(0) 编辑