97
97
98
98
// External DLL procedures
99
99
100
- procedure Init (
100
+ procedure init (
101
101
AssetsBasePath: PAnsiChar;
102
102
RawFontDefinitions: PAnsiChar;
103
103
RawStyleOverrideDefinitions: PAnsiChar;
@@ -110,8 +110,8 @@ procedure Init(
110
110
OnClick: TOnClickCb
111
111
); cdecl; external ' xframesshared.dll' ;
112
112
113
- procedure SetElement (ElementJson: PAnsiChar); cdecl; external ' xframesshared.dll' ;
114
- procedure SetChildren (ID: Integer; ChildrenIDs: PAnsiChar); cdecl; external ' xframesshared.dll' ;
113
+ procedure setElement (ElementJson: PAnsiChar); cdecl; external ' xframesshared.dll' ;
114
+ procedure setChildren (ID: Integer; ChildrenIDs: PAnsiChar); cdecl; external ' xframesshared.dll' ;
115
115
116
116
117
117
// Callback implementations
@@ -137,9 +137,9 @@ begin
137
137
try
138
138
ChildrenIDs.Add(1 );
139
139
140
- SetElement (PAnsiChar(AnsiString(RootNode.ToJSON))); // Convert to PAnsiChar
141
- SetElement (PAnsiChar(AnsiString(UnformattedText.ToJSON)));
142
- SetChildren (0 , PAnsiChar(AnsiString(ChildrenIDs.ToJSON)));
140
+ setElement (PAnsiChar(AnsiString(RootNode.ToJSON))); // Convert to PAnsiChar
141
+ setElement (PAnsiChar(AnsiString(UnformattedText.ToJSON)));
142
+ setChildren (0 , PAnsiChar(AnsiString(ChildrenIDs.ToJSON)));
143
143
finally
144
144
ChildrenIDs.Free;
145
145
end ;
@@ -254,7 +254,7 @@ begin
254
254
255
255
FontDefs.AddPair(' defs' , DefsArray);
256
256
257
- Init (
257
+ init (
258
258
PAnsiChar(AnsiString(' ./assets' )),
259
259
PAnsiChar(AnsiString(FontDefs.ToJSON)),
260
260
PAnsiChar(AnsiString(ThemeDef.ToJSON)),
0 commit comments