diff --git a/funcext/tvclib/tslvcl.tsf b/funcext/tvclib/tslvcl.tsf index 64194f2..c86777f 100644 --- a/funcext/tvclib/tslvcl.tsf +++ b/funcext/tvclib/tslvcl.tsf @@ -7911,7 +7911,7 @@ type tapplication=class(tcomponent) initialize(); {$ifdef linuxgtk} idledata :=(new tcbytearray(4))._getptr_(); - id := _wapi.tsl_gtk_idle_interface(idledata); //¹¹Ôìidle + id := tsl_gtk_idle_interface(idledata);//_wapi.tsl_gtk_idle_interface(idledata); //¹¹Ôìidle _wapi.gtk_main(); _Wapi.g_idle_remove_by_data(idledata); //ɾ³ýidle return 1; @@ -32230,7 +32230,7 @@ type TCreateProcessA = class() end function deleteproc(pid,flg); begin - _wapi.tsl_gtk_closehandle(fidarray[pid]);//ɾ³ýfid + tsl_gtk_closehandle(fidarray[pid]);//ɾ³ýfid reindex(fidarray,array(pid:nil)); reindex(fidarraya,array(pid:nil)); tp := fidarrayb[pid]; @@ -41015,7 +41015,6 @@ begin //ClearScriptCache(); //global tuiapplication; //tuiapplication := getapplication(); - setcallbackunitname("tslvcl"); class(TSLUICONST).sinit(); class(tenumeration).initenumeration(new tconstant()); class(UIglobalData).uisetdata("TGlobalComponentcache",class(TGlobalComponentcache)); diff --git a/plugin/TSLUIL.dll b/plugin/TSLUIL.dll index d0ad665..4f09bfb 100644 Binary files a/plugin/TSLUIL.dll and b/plugin/TSLUIL.dll differ