Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Index: LuaCalendar.pas
- ===================================================================
- --- LuaCalendar.pas (wersja 0)
- +++ LuaCalendar.pas (kopia robocza)
- @@ -0,0 +1,57 @@
- +unit LuaCalendar;
- +
- +{$mode delphi}
- +
- +interface
- +
- +uses
- + Classes, SysUtils, lua, lualib, lauxlib, LuaHandler,
- + pluginexports, controls, ComCtrls;
- +
- +procedure initializeLuaCalendar;
- +
- +implementation
- +
- +uses luaclass, LuaWinControl, Calendar;
- +
- +
- +function createCalendar(L: Plua_State): integer; cdecl;
- +var
- + Calendar: TCalendar;
- + parameters: integer;
- + owner: TWincontrol;
- +begin
- + result:=0;
- +
- + parameters:=lua_gettop(L);
- + if parameters>=1 then
- + owner:=lua_toceuserdata(L, -parameters)
- + else
- + owner:=nil;
- +
- + lua_pop(L, lua_gettop(L));
- +
- +
- + Calendar:=TCalendar.Create(owner);
- + if owner<>nil then
- + Calendar.Parent:=owner;
- +
- + luaclass_newClass(L, Calendar);
- + result:=1;
- +end;
- +
- +procedure Calendar_addMetaData(L: PLua_state; metatable: integer; userdata: integer );
- +begin
- + wincontrol_addMetaData(L, metatable, userdata);
- +end;
- +
- +procedure initializeLuaCalendar;
- +begin
- + lua_register(LuaVM, 'createCalendar', createCalendar);
- +end;
- +
- +initialization
- + luaclass_register(TCustomCalendar, Calendar_addMetaData);
- +
- +end.
- +
- Index: LuaHandler.pas
- ===================================================================
- --- LuaHandler.pas (wersja 2294)
- +++ LuaHandler.pas (kopia robocza)
- @@ -63,7 +63,7 @@
- debuggertypedefinitions, symbolhandler, frmautoinjectunit, simpleaobscanner,
- addresslist, memscan, foundlisthelper, cesupport, DBK32functions, sharedMemory,
- disassemblerComments, disassembler, LuaCanvas, LuaPen, LuaFont, LuaBrush, LuaPicture, LuaMenu,
- - LuaDebug, LuaThread, LuaGraphic, LuaProgressBar, LuaOldD3DHook, LuaWinControl,
- + LuaDebug, LuaThread, LuaGraphic, LuaProgressBar, LuaCalendar, LuaOldD3DHook, LuaWinControl,
- LuaMemoryRecord, LuaForm, MemoryBrowserFormUnit, disassemblerviewunit, hexviewunit,
- CustomTypeHandler, LuaStructure, LuaRegion, LuaXMPlayer, LuaMemscan, LuaFoundlist,
- LuaRadioGroup, LuaRasterImage, LuaCheatComponent, LuaAddresslist, byteinterpreter,
- @@ -4740,6 +4740,7 @@
- initializeLuaListbox;
- initializeLuaCombobox;
- initializeLuaProgressbar;
- + initializeLuaCalendar;
- initializeLuaTrackbar;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement