共 919 篇文章 |
|
Win10下Delphi 10.4.2 (RAD Studio 10.4.2 )安装教程图解。一、安装文件下载。1、解压RADStudio-1042-4203.iso文件。3、将破解文件解压到安装文件目录。4、以administrator用户运行安装文件。5、运行破解文件RADStudioKeyPatch.exe.一、安装文件下载 1、官方下载:网盘包括破解文件。安装外国人的东西尽量不要在中文目录下,被整怕了,就习惯... 阅1029 转8 评0 公众公开 23-09-06 08:39 |
Delphi的移动文件方法(转)/删除文件:/文件的复制。CopyFile(PChar(源文件),PChar(目标文件),True);为False表示覆盖。才看到这个贴子,可以用以下的方法: CopyFile(pchar(''''''''c:\sql.txt''''''''), pchar(''''''''d:\sql.txt... 阅401 转0 评0 公众公开 22-11-18 11:36 |
FillChar(FromBuf, SizeOf(FromBuf), 0);//初始化数组FromBuf StrPCopy(FromBuf, PChar(Edit1.Text)); //将FromBuf填入源目录 with OPS do begin Wnd:= Handle; wFunc:= FO_DELETE; //进行删除 pFrom:= @FromBuf; pTo:= nil; fFlags:= FOF_NOCONFIRMATION; lpszProgressTitle:= ''''''''正在删除''... 阅234 转2 评0 公众公开 22-11-18 11:33 |
procedure Edit2Change(Sender: TObject);if MessageDlg(''你确定要替换所有文件中的字符:''+#+''" ''+edit1.text+''" 替换成:"''+edit2.text+''" 吗?'',mtWarning, [mbYes, mbNo], ) = mrNo thenbeginexit;end;memo1.Lines.Clear;file1:=FileListBox1.F... 阅2496 转12 评0 公众公开 22-11-18 10:28 |
阅959 转3 评0 公众公开 22-10-10 09:30 |
webbrowser1.在download事件中: webbrowser1.oleobject.Document.body.Scroll := ''''''''no''''''''; webbrowser1.oleobject.Document.documentElement.style.overflow := ''''''''hidden'''''''';webb... 阅777 转1 评0 公众公开 22-08-04 11:40 |
给TWebBrowser添加鼠标事件unit Unit1;interfaceuses.TForm1 = class(TForm) WebBrowser1: TWebBrowser;procedure WebBrowser1DocumentComplete(Sender: TObject;procedure AppMsg(var Msg: TagMsg;var Handled: Boolean);implementation{$R *.dfm}procedure TForm1.AppMsg(var Msg: TagMsg;myPoint: T... 阅14 转0 评0 公众公开 22-08-04 11:12 |
阅182 转1 评0 公众公开 22-08-03 17:05 |
阅25 转0 评0 公众公开 22-08-03 11:03 |
但是模拟网页提交,界面上是不一定要出现WebBrowser的,肯定有办法,不通过WebBrowser就直接解析HTML的,那便是我不要WebBrowser这个外壳,只要他里面的Document文档接口对象就能实现对Html的解析了,查找了一番MSDN,然后Google一下,果然可行,构建方法如下: 阅1358 转0 评0 公众公开 22-07-27 16:57 |