摘要: 英巴卡迪诺北京科技有限公司,地址是北京市朝阳门外大街18号丰联广场B座813B,这家公司这家公司不拥有:delphi 1.0~delphi7.0 、delphi 2005版本的著作权,这些都还是属于Borland公司的,大家可以到美国版权局的网站上去查询(http://cocatalog.loc.g 阅读全文
posted @ 2020-03-14 08:05 李先森° 阅读(270) 评论(0) 推荐(0) 编辑
摘要: 相信用过Delphi的人,都很清楚FastScript,EPX Studio就是以FastScript为编程基础语言,由于FastScript支持类似于Delphi的Pascal语法,因此EPX Studio选用了Delphi 2007(精简版)作为编辑器,汉化来自于开源的CNPACK,IDE环境使 阅读全文
posted @ 2020-03-14 08:03 李先森° 阅读(347) 评论(0) 推荐(0) 编辑
摘要: 1 procedure TForm1.BitBtn1Click(Sender: TObject); 2 var REP : IExcelPanelXDisp; 3 modulePath:string; 4 begin 5 REP := this.NewEPX; 6 REP.AddAValue(ADO 阅读全文
posted @ 2020-03-12 13:56 李先森° 阅读(127) 评论(0) 推荐(0) 编辑
摘要: procedure TF408017792.Button1Click(Sender: TObject); var NEPX: IExcelPanelXDisp; begin NEPX := this.NewEPX; NEPX.ScriptRun(CommandLine.ModuleRoot + '\ 阅读全文
posted @ 2020-03-12 13:54 李先森° 阅读(143) 评论(0) 推荐(0) 编辑
摘要: procedure TF1167908962.Button1Click(Sender: TObject); begin ThIndex := 1; EPXThread1.StartThread; EPXThread2.StartThread; end; procedure TF1167908962. 阅读全文
posted @ 2020-03-12 13:53 李先森° 阅读(123) 评论(0) 推荐(0) 编辑
摘要: #coding: utf-8 import itchat,datetime from itchat.content import TEXT itchat.auto_login(hotReload=True)#不需要重复扫码登录 class WeChat(object): def get_all_in 阅读全文
posted @ 2020-03-12 13:52 李先森° 阅读(942) 评论(0) 推荐(0) 编辑
摘要: 用delphi怎么实现延时功能?在delphi中有一个sleep()函数是用来暂停线程的,使用了它好像和死掉了似得,不好用,这么简单的延时动作用Timer控件有显得复杂了。下面给大家分享一个真正好用的延时功能: procedure delay(MSecs:LongInt); var FirstTic 阅读全文
posted @ 2020-03-12 13:51 李先森° 阅读(1331) 评论(0) 推荐(0) 编辑
摘要: PyQt5 UI文件转换为对应版本的py文件 1 #coding=utf-8 2 ''' 3 PyQt5 UI文件转换为对应版本的py文件 4 python -m PyQt5.uic.pyuic untitled.ui -o untitled.py 5 ''' 6 import os 7 8 # 此 阅读全文
posted @ 2020-03-12 13:48 李先森° 阅读(460) 评论(0) 推荐(0) 编辑
摘要: <!DOCTYPE html> <html> <head> <meta charset="utf-8"> <title>XXX联系方式</title> <meta name="viewport" content="width=device-width; initial-scale=1.0"> <li 阅读全文
posted @ 2020-03-11 16:53 李先森° 阅读(812) 评论(0) 推荐(0) 编辑
摘要: 1 implementation 2 3 var Document_: DispHTMLDocument; //用于处理网页文档对象 4 EPX: IExcelPanelXDisp; 5 6 procedure TForm1.FormShow(Sender: TObject); 7 begin 8 阅读全文
posted @ 2020-03-11 08:26 李先森° 阅读(246) 评论(0) 推荐(0) 编辑