Compare commits

...

2 Commits

Author SHA1 Message Date
6f658d4a66 renamed 2024-03-19 13:32:13 +01:00
5d61c2b53e removed 2024-03-19 13:31:51 +01:00
2 changed files with 48 additions and 32 deletions

View File

@ -1,32 +0,0 @@
{
"File-Menue": [
{
"Name": "Tarif Zone 1",
"File-ID": "999_TZ1"
},
{
"Name": "Tarif Zone 2",
"File-ID": "999_TZ2"
},
{
"Name": "Tarif Zone 3",
"File-ID": "999_TZ3"
},
{
"Name": "Tarif Zone 4",
"File-ID": "999_TZ4"
},
{
"Name": "Tarif Zone 5",
"File-ID": "999_TZ5"
},
{
"Name": "Tarif Zone 6",
"File-ID": "999_TZ6"
},
{
"Name": "Basic Configuration",
"File-ID": "999_CFG1"
}
]
}

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