- 博客(36)
- 资源 (5)
- 收藏
- 关注
RSS订阅转载 windows 编译火狐浏览器68.0.1
链接: https://pan.baidu.com/s/14XqI6G01KogPIcumCfavMA 提取码: bzgb1、平台Win10 64bitVisual studio 2019 16.2.0至少4G RAM，建议8G，当然越多越好。40G硬盘空间。注：编译Firefox68 for windows需要64位的win7或以上版本的windows。2、源码firefox-68.0.1.source.tar.xz。解压至：f:\firefox68.0.13、前言
2021-09-13 09:10:59
756
原创 火狐源码windows构建 2020-04-29最新版
在Windows上构建Firefox最近一直在研究火狐浏览器内核源码，发现最新windows构建方式跟百度搜索到的老的方式有很大不同，搜索到官方文档。官方链接在Windows上构建Firefox感谢您帮助我们在世界上最受欢迎的操作系统上构建世界上最好的浏览器。本文档将帮助您进行设置，以在本地计算机上的自己版本的Firefox上进行构建和破解。设置并不困难，但可能要花一些时间-我们需要下载...
2020-04-29 14:38:54
1112
原创 CxLookupCombobox实现下拉框表格效果
一、控件的使用1、Form中增加ADOConnection（连接数据库）、ADOQuery（选择下拉显示的内容表）、DataSource三个控件。设置相应参数，就其数据库的表。2、Form加入cxLookupComboBox控件二、设置cxLookupComboBox属性设置（1）“Properties”属性，点击“ListSource”，改成DataSour...
2019-12-30 10:01:01
1375
原创 获取任务栏高度的函数
function GetTaskBarHeight: Integer;varR: TRect;beginSystemParametersInfo(SPI_GETWORKAREA, 0, @R, 0);result := R.bottom - R.Top;end;
2019-07-30 20:59:18
549
原创 隐藏任务栏和菜单按钮
varh： Thandle;h := findwindow('Shell_TrayWnd', nil);showwindow(h, SW_HIDE);h := findwindow('Button', nil);showwindow(h, SW_HIDE);
2019-07-30 20:56:05
337
原创 Delphi 10.2.3东京，debug模式，只是一个空白窗体运行无任何代码。死机或者软件卡死。（WIN7系统）
自己电脑突然运行debug模式就卡死或者直接死机，就是只能reset。任务管理器都调不出来的那种。经过四天的重装系统和Delphi发现，竟然发现是搜狗拼音输入法的问题。搜狗拼音输入法9.0之后就和Delphi运行冲突，导致Delphi运行卡死或者死机。目前只在win7下测试发现。其他系统请自测。解决方法：把搜狗拼音输入法卸载即可。目前qq输入法是可以的。...
2019-02-21 15:39:29
616
转载 ie浏览器提示 "Internet Explorer 已经限制此网页运行脚本或Activex控件"
“Internet Explorer 已经限制此网页运行脚本或Activex控件”出现的条件有以下几种:1、本地调试html页2、内有js (外部引用,内部引用,标签绑定等)3、特殊的css(filter behavior expression等)4、flash等插件调用5、activex控件为了防止出现这种提示，可以在ie浏览器中设置。具体是选择Internet选项-》高级-》在...
2018-09-27 08:59:52
2864
转载 WebBrowser控件默认使用IE9,IE10的方法
最近为了抓取淘宝的成交数据,用C#的WebBrowser控件开发了一个简单的程序.发现WebBrowser控件默认使用的版本是IE7的兼容模式.而淘宝的宝贝详细页居然对IE7的支持不是很好.成交记录无法显示,而我本机安装的是IE10,那么有没有办法使我的WebBrowser控件的使用的IE版本高点呢?查找到了MSDN的一篇文章,上面有详细的说明,简单翻译如下: 1,打开注册表...
2018-09-27 08:58:14
3237
转载 Delphi之安卓开发【Hello World！】
0、打开Delphi XE10.2；1、选择Create a new Multi-Device Application(Delphi)，如下：2、在Project Manager里做一些选择：①Build Configuratons选择Release模式；②Taeget Platforms选择Android；③插入移动设备，如手机（这里推荐使用真机调试，因为Delphi这里...
2018-08-16 15:26:31
9715
1
转载 Delphi之安卓开发【环境配置】
Delphi的安卓环境配置，整体来说，按部就班地来的话是比较简单的，主要需要把SDK、NDK、JAVA环境设置正确即可。方法：0、常规方式安装Delphi XE10.2；1、下载SDK、NDK、JAVA压缩包，SDK可以是24，也可以是比较新的25或者26版本；2、解压压缩包到一个选定的目录，比如我是将SDK和NDK放到了D盘：3、安装完毕后，打开Delphi→Tools→→O...
2018-08-16 15:25:41
4540
转载 delphi中pchar、char、string的定义与区别
Char是单个字符；PChar 就是指向一个以Null 结尾的每个字符为一个字节的字符串的指针。 (可以看成是一个字符串)String是字符数组，以字符#0结尾；Char只占一字节的空间，而Pchar保存的是一个指针，在现在32位的系统中占有1个指针字节的大小。type PChar=^Char; PChar类型是一个指向Char的指针,并使用Delphi的扩展语法.它也能够作为一个St...
2018-08-09 14:28:57
531
转载 Delphi WebBrowser控件的使用（大全 good）
Delphi WebBrowser控件的使用WebBrowser控件属性：1、Application 如果该对象有效，则返回掌管WebBrowser控件的应用程序实现的自动化对象(IDispatch)。如果在宿主对象中自动化对象无效，程序将返回WebBrowser控件的自动化对象2、Parent 返回WebBrowser控件的父自动化对象，通常是一个容器，例如是宿主...
2018-08-09 08:48:11
4861
转载 delphi 注册表操作(读取、添加、删除、修改)完全手册
32位Delphi程序中可利用TRegistry对象来存取注册表文件中的信息。 一、创建和释放TRegistry对象 1.创建TRegistry对象。为了操作注册表，要创建一个TRegistry对象：ARegistry := TRegistry.Create； 2.释放TRegistry对象。对注册表操作结束后，应释放TRegistry对象所占内存：ARegistry.Des...
2018-08-09 08:45:44
493
转载 delphi 函数参数传递 默认参数(传值)、var(传址)、out(输出)、const(常数)四类
参数可以分为: 默认参数(传值)、var(传址)、out(输出)、const(常数)四类 {默认参数是传值, 不会被改变}function MyF1(x: Integer): Integer;begin Inc(x); Result := x;end; {var参数是传址, 会被改变}function MyF2(var x: I...
2018-08-09 08:42:41
1741
转载 bitmap的pixelFormat
TBitmap的PixelFormat有好多種：pfDevice, pf1bit, pf4bit, pf8bit, pf15bit, pf16bit, pf24bit, pf32bit, pfCustompf24bit是指RGB各有8個位元表示，pfDevice: 使用系統裝置預設值pf1bit : 1 PIXEL=1 BIT ; 單色 0=黑 1=白pf4bit : 1 PIXEL=...
2018-08-09 08:40:10
2151
转载 Set8087CW作用
//FPU:浮点运算器,Floating Point Unit的简写,浮点运算单元是专门用于浮点运算的处理器,集成于CPU之内,效率高、执行快//Set8087CW(开关FPU)//Set8087CW($1372):开FPU,默认值//Set8087cw($133f):闭FPU//Procedure Set8087CW(NewCW: Word);//Default8087CW:...
2018-08-06 08:46:43
1351
转载 superobject 解析json串
uses superobject; procedure TForm1.FormCreate(Sender: TObject);var aJson: ISuperObject;aSuperArray: TSuperArray; i:Integer;begin {1、赋初值} aJson:=SO('{"zoo":"涂磊动
2018-03-09 16:13:47
2109
转载 web微信协议通讯过程
微信Web版通信过程分析=====================================本文参考 《挖掘微信Web版通信的全过程》代码参考 Python网页微信API 附作者根据以上代码用.NET重构的版本 ===================================== 0.说明前人已经做了大量工作，作者在此基础上略加
2018-03-08 13:27:11
2094
转载 WEb微信协议
[文档]Web微信协议1.登录1.1 获取uuid(get)请求https://login.wx.qq.com/jslogin?appid=wx782c26e4c19acffb&redirect_uri=https%3A%2F%2Fwx.qq.com%2Fcgi-bin%2Fmmwebwx-bin%2Fwebwxnewloginpage&fun=new&lang=zh_CN
2018-03-08 13:26:40
12125
转载 Dlephi 选择文件夹目录保存
Windows目录对话框是一个标准的WindowsUI控件，其可以列出一个目录列表，并且可以显示新增按钮。由于Delphi中并没有提供对于该控件的封装，所以打开它是个问题。网上有多种方法，试举几例：1、使用Win31目录下的DriverList、DirectoryList、FileList和FileFilterList四个控件进行组合来获取当前目录，操作复杂，也不美观，对程序EXE体积影响
2018-01-26 10:17:36
353
转载 几个获取windows系统信息的程序
本文所有的窗体界面略去，读者可根据程序自行添加各窗口组件。1、获取windows版本信息可以通过Windows API函数GetVersionEx来获得。具体程序如下：Procedure Tform1.Button1Click(sender:TObject); Var OSVI:OSVERSIONINFO; begin OSVI.dwOSversio
2018-01-25 09:06:23
785
转载 Delphi数据集与记录
1.1Delphi数据库应用程序的层次结构Delphi数据库应用程序通过数据存取构件对数据库进行访问，通过可视的数据构件(Data Control)将数据呈现给用户，并与用户进行交互。Delphi数据库应用程序的结构如下图： 图 2‑1 Delphi数据库应用程序结构图Delphi访问数据库可以分为三级：(1)、由ADO(Active Data Object)对象及底层数据库
2018-01-05 17:47:11
3195
转载 Delphi UDp控件
DELPHI中有两个UDP控件：TIdUDPServer和TIdUDPClient控件，可用于传输UDP数据；用法都很简单，主要是一些细微的特性，弄清楚了对正确使用这两种控件有很大的好处；下面分别介绍：一、 TIdUDPServer：代表一个UDP的服务端，接收UDP客户端发过来的数据；在FORM上放置一个TIdUDPServer控件，命名为UDPSvr，在FormC
2018-01-05 17:45:37
1894
原创 Delphi 实现图片上下翻转
SrcR := Rect(0, 0, imgTran.Width, imgTran.Height); DesR := Rect(0, imgTran.Height, imgTran.Width, 0); imgEnd.Repaint; imgEnd.Canvas.CopyRect(DesR, imgTran.Canvas, SrcR);把imgTran的图片反转复制到imgEnd上。
2018-01-05 17:41:25
1044
原创 窗体锁定在屏幕内 不可超出桌面屏幕边缘
procedure WMWindowPosChanging(var Message: TWMWindowPosChanging); message WM_WINDOWPOSCHANGING;procedure TFmBack.WMWindowPosChanging(var Message: TWMWindowPosChanging);begin inherited; if (Messa
2018-01-02 15:04:29
1342
原创 防止程序运行多个
program main;uses Forms, windows,// Unit1 in 'Unit1.pas' {Form1};{$R *.res}var hmutex:hwnd;begin Application.Initialize; application.Title:='test'; hmutex:=createmutex(nil,false,'te
2017-12-28 13:49:48
854
原创 程序开机自启
UsesRegistryprocedure TFmConnection.SetAutoRun(ok: boolean);var Reg:TRegistry; //首先定义一个TRegistry类型的变量Regbegin Reg:=TRegistry.Create; try //创建一个新键
2017-12-20 15:43:05
237
原创 Delphi窗体任务栏隐藏和透明
把工程里的Application.MainFormOnTaskBar:=true ; 改为 Application.MainFormOnTaskBar:=False ; 在onshow 里加入:ShowWindow(Application.Handle, SW_HIDE); //不在任务栏显示 就搞定.
2017-12-15 09:06:09
1369
转载 Delphi XE(Indy10)TIdBytes转AnsiString的实现
TIdBytes 类型引用自单元 IdGlobal；其原型定义为 TIdBytes = array of Byte;转换函数如下：经过测试多次发送后在字符串尾部不会出现乱码或多余字符[delphi] view plain copy print?function IdBytesToAnsiString(ParamBytes: T
2017-11-30 16:43:50
3439
原创 Indy10 IdudpServer获取字符串数据Read事件，TIdBytes类型的使用,支持中文
Indy10 IdudpServer获取字符串string类型数据，采用Read事件，TIdBytes类型的使用，支持中文，双字节。indy10变化相当大，都不会用了。开始被Tidbytes这个类型搞晕。Indy10 IdudpServer使用uses IDGlobal;Read事件主要代码:s:=enutf8.getting(adata);s := UTF8ToS
2017-11-30 16:33:38
1828
2
原创 SQL语句
SQL语言是数据库编程中最常使用的，功能非常强大，在delphi中只有通过Query组件使用，所以心铃用一讲的篇幅着重讲一下。在网上这方面的内容很多，还有专门的书籍讲解SQL,如〈SQL21天自学通〉，建议大家阅读一下。本讲中主要讲解编程中最常用的一些语句，由于初学者对语法不熟悉，所以这里以例句的形式给出，这些例句都是精选的最常用的例句，经过心铃亲自验证过的，下一讲将在编程中具体运用。 关于S
2017-11-22 11:41:39
337
原创 动态SQL语句
动态使用SQL语句的几点技巧： 动态SQL语句，就是SQL语句中参数会变化的SQL语句，一般在程序中要根据用户的需要随时改变其参数值，对于动态SQL语句必须注意以下几点： ●先调用Close方法，关闭Query组件。如果Query组件已经关闭，调用Close方法不会出错, 也没有其它影响。 ●再调用Clear方法，清除SQL属性中的现存SQL语句，如果不调用Clear方法，用
2017-11-22 11:36:01
609
原创 ExecSQL的方法
Query组件的常用方法：1. ExecSQL方法用来执行SQL代码，也就是说执行你在SQL属性编写好的SQL语句。Query组件还有一个Open方法，也是用来执行SQL代码的，但二者之间有不同之处：Open方法只能用来执行SQL语言的查询语句(Select命令)，并返回一个查询结果集。ExecSQL方法除了可执行Select语句外还可执行其它SQL语句（如Update、Insert、D
2017-11-22 11:32:59
18036
原创 Guid生成唯一ID编号
function GetGUID: string;var i: Integer; GUID: TGUID;begin i := 0; Result := ''; while i < 3 do begin if CoCreateGuid(GUID) = S_OK then begin SetLength(Result, 32);
2017-10-13 16:27:56
1748
转载 delphi中使用sql语句加条件引用时值是一个整型变量的问题
转自蒋老师的个人博客http://www.cnblogs.com/JTeacher/archive/2012/11/19/2776968.html
2017-10-13 16:17:27
1929
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人