Einzelnen Beitrag anzeigen

TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.060 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: JSON-Objekt aus Datasnap-Server mit JavaScript weiter verarbeiten.

  Alt 10. Mai 2016, 08:51
So sieht es jetzt zur Zeit aus:

Code:
         function ShowDeviceInfo() {
            var devicesObject = serverMethods().GetDeviceInfo();
            var devicesArrayObject = JSON.parse(devicesObject.result);
            var devicesArray = devicesArrayObject.devices;

            for (var deviceIndex in devicesArray) {
               var singleDevice = devicesArray[deviceIndex];
               AddDeviceRow(singleDevice);
            }

         }

         function AddDeviceRow(singleDevice) {
            var table_id = "tabelle1";
            var table = document.getElementById(table_id);
            var rows = table.getElementsByTagName("tr").length;
            var tr = table.insertRow(rows);
            var td1 = document.createElement("td");
            var td2 = document.createElement("td");
            var td3 = document.createElement("td");
            var td4 = document.createElement("td");
            td1.innerHTML = "online";
            td2.innerHTML = singleDevice.serialNumber;
            td3.innerHTML = singleDevice.name;
            td4.innerHTML = singleDevice.data;
            tr.appendChild(td1);
            tr.appendChild(td2);
            tr.appendChild(td3);
            tr.appendChild(td4);
         }
Ich habe eine Tabelle, die ich mit den Werten fülle.
ShowDeviceInfo() rufe ich im OnLoad() auf.

Du meinst sicher das Prüfen im
Delphi-Quellcode:
procedure TWebServerModule.DSAuthenticationManagerUserAuthenticate(
  Sender: TObject; const Protocol, Context, User, Password: string;
  var valid: Boolean; UserRoles: TStrings);
, richtig?
Ja, das steht auch noch auf der Tagesordnung.
  Mit Zitat antworten Zitat