摘要: 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) 编辑