Selaa lähdekoodia

* Small fix in html, add missing closing tr tag

michael 6 vuotta sitten
vanhempi
commit
59e69a4993
1 muutettua tiedostoa jossa 2 lisäystä ja 0 poistoa
  1. 2 0
      demo/restbridge/simple/restbridgeclient.lpr

+ 2 - 0
demo/restbridge/simple/restbridgeclient.lpr

@@ -99,9 +99,11 @@ Var
   sHTML : String;
   sHTML : String;
 
 
 begin
 begin
+  // Prepend dataset name to id?
   sHtml:=Format('<tr id="row-%d"><td>%d</td>',[DataSet.RecNo,aRowNo]);
   sHtml:=Format('<tr id="row-%d"><td>%d</td>',[DataSet.RecNo,aRowNo]);
   For I:=0 to Dataset.Fields.Count-1 do
   For I:=0 to Dataset.Fields.Count-1 do
     sHTML:=sHTML+'<td>'+Dataset.Fields[i].AsString+'</td>'+sLineBreak;
     sHTML:=sHTML+'<td>'+Dataset.Fields[i].AsString+'</td>'+sLineBreak;
+  sHTML:=sHtml+'</tr>';
   Result:=sHTML;
   Result:=sHTML;
 end;
 end;