diff --git a/packages/fcl-web/src/fpdatasetform.pp b/packages/fcl-web/src/fpdatasetform.pp
index ce370b6837..3533dcb0bf 100644
--- a/packages/fcl-web/src/fpdatasetform.pp
+++ b/packages/fcl-web/src/fpdatasetform.pp
@@ -1006,6 +1006,8 @@ procedure THTMLDatasetFormGridProducer.ControlToTableDef (aControldef : TFormFie
       CellType := ctLabel;
       IsLabel := false;
       Value := aControlDef.FField.asstring;
+      if aControldef.Action <> '' then
+        Link := Format(aControldef.Action,[value]);
       if not FSeparateLabel and not FIncludeHeader then
         begin
         Caption := aControldef.LabelCaption;