Changeset 71 for trunk/Application/UWebObjects.pas

Timestamp:

Feb 11, 2012, 10:43:06 AM (12 years ago)

Author:

chronos

Message:

• Upraveno: Periodické načítání obrázků kamery se nyní provádí na pozadí kvůli zamezení problikávání.

File:

• trunk/Application/UWebObjects.pas (modified) (1 diff)

trunk/Application/UWebObjects.pas

@@ -161 +161 @@
         with THtmlCell(Row.Cells.AddNew(THtmlCell.Create)) do begin
           Value := THtmlString.Create;
-          THtmlString(Value).Text := Caption + ': ';
+          THtmlString(Value).Text := Caption;
+          if Required then THtmlString(Value).Text := THtmlString(Value).Text + '*';
+          THtmlString(Value).Text := THtmlString(Value).Text + ': ';
         end;
         with THtmlCell(Row.Cells.AddNew(THtmlCell.Create)) do begin