瀏覽代碼

* Small fix in html, add missing closing tr tag

michael 6 年之前
父節點
當前提交
59e69a4993
共有 1 個文件被更改,包括 2 次插入0 次删除
  1. 2 0
      demo/restbridge/simple/restbridgeclient.lpr

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

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