liujianjun
/
tslediter
3
0
Fork 1
Code Issues Pull Requests Projects Releases Wiki Activity

Update utslvclstdctl.tsf 

gtk idle
This commit is contained in:
JianjunLiu 2022-11-24 14:32:48 +08:00
parent f554216201
commit 9831a0260f
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
funcext/tvclib/utslvclstdctl.tsf
View File

@ -6766,11 +6766,15 @@ type tedolist = class()
flockct; //计数 flockct; //计数
flist; //链表 flist; //链表
end end
function uinit();
initialization begin
{$ifdef linux} {$ifdef linux}
class(tUIglobalData).uisetdata("G_T_TTIMER_",class(TCustomTimer)); class(tUIglobalData).uisetdata("G_T_TTIMER_",class(TCustomTimer));
class(TCustomTimer)._wapi.SetTimer(nil,10000,100,getwinprocptr(2)); o := new TSLUIBASE();
o._wapi.SetTimer(nil,10000,100,getwinprocptr(2));
{$endif} {$endif}
end
initialization
uinit();
end. end.