From ba15fa79699fdb0750c9297ef31c0b0d7afa7834 Mon Sep 17 00:00:00 2001 From: Gerhard Hoffmann Date: Tue, 19 Mar 2024 09:36:03 +0100 Subject: [PATCH] provide for future use --- etc/psa_webinterface/config.json | 48 ++++++++++++++++++++++++++++++++ 1 file changed, 48 insertions(+) create mode 100644 etc/psa_webinterface/config.json diff --git a/etc/psa_webinterface/config.json b/etc/psa_webinterface/config.json new file mode 100644 index 0000000..a7005be --- /dev/null +++ b/etc/psa_webinterface/config.json @@ -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 +