This commit is contained in:
Gerhard Hoffmann 2024-03-19 13:32:13 +01:00
parent 5d61c2b53e
commit 6f658d4a66

View File

@ -0,0 +1,48 @@
{
"File-Menue": [
{
"Name": "Tarif Zone 1",
"File-ID": "customer_999:zg1/zone1"
},
{
"Name": "Tarif Zone 2",
"File-ID": "customer_999:zg1/zone2"
},
{
"Name": "Tarif Zone 3",
"File-ID": "customer_999:zg1/zone3"
},
{
"Name": "Tarif Zone 4",
"File-ID": "customer_999:zg1/zone4"
},
{
"Name": "Tarif Zone 5",
"File-ID": "customer_999:zg1/zone5"
},
{
"Name": "Tarif Zone 6",
"File-ID": "customer_999:zg1/zone6"
},
{
"Name": "Basic Configuration",
"File-ID": "customer_999:master"
}
]
}
Was wir dann noch brauchen um Json zureuckgeben zu koennen:
der Speicher muss gross genug sein. Oder man hat eine weitere
Funktion mit der man die Groesse des Jsons abfragen kann, damit
Du in Pascal den Speicher passend bereitstellen kannst.
function GetFile(var FileId; var buffer, size) : cint32; stdcall -> size=0: gibt die Dateigroesse zurueck
function GetFile(var FileId; var buffer, size) : cbool; stdcall -> ize> 0: datei wird vom C-Code in den uebergebenen Speicher kopiert
function SetFile(var FileId; var buffer) : cbool; stdcall
function GetFileMenue(var buffer, size): cint32; stdcall -> size=0: gibt Dateigroesse zurueck
function GetFileMenue(var buffer, size): cbool; stdcall -> size>0: kopiert Datei nach buffer