diff options
author | George Hazan <ghazan@miranda.im> | 2019-04-12 16:48:28 +0300 |
---|---|---|
committer | George Hazan <ghazan@miranda.im> | 2019-04-12 16:48:28 +0300 |
commit | 858af271c0175cce3aad327c8092f6bcd69c89b4 (patch) | |
tree | f9141bfae89e5b615cadbe5aaa2c8f5ba3b5eed1 /include/delphi/m_api.pas | |
parent | 2a2ae7810fe1d5dcaa4e19d57b6010a4d84a338f (diff) |
major crutch for pascal plugins
Diffstat (limited to 'include/delphi/m_api.pas')
-rw-r--r-- | include/delphi/m_api.pas | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/include/delphi/m_api.pas b/include/delphi/m_api.pas index 5500263fca..6237eaaa56 100644 --- a/include/delphi/m_api.pas +++ b/include/delphi/m_api.pas @@ -142,13 +142,19 @@ type type
PCMPlugin = ^CMPlugin;
- CMPlugin = record
+ CMPlugin = packed record
vft : pointer; // virtual function table
+
m_hInst : THANDLE;
m_szModule : PAnsiChar;
m_pInfo : PPLUGININFOEX;
m_hLogger : THANDLE;
- m_hLang : int;
+
+ blabla1 : pointer; // emulator of icon's list
+ blabla2 : integer;
+ blabla3 : integer;
+ blabla4 : integer;
+ blabla5 : pointer;
end;
//----- Fork enchancement -----
@@ -252,6 +258,7 @@ implementation initialization
g_plugin.m_hInst := hInstance;
g_plugin.m_pInfo := @PluginInfo;
+ g_plugin.blabla4 := 10;
RegisterPlugin(g_plugin);
finalization
|