Search, Paging, and "As of" Date #10
@ -819,4 +819,7 @@
|
||||
<data name="“As of” Date Display" xml:space="preserve">
|
||||
<value>Visualización de la Fecha “Como de”</value>
|
||||
</data>
|
||||
<data name="as of" xml:space="preserve">
|
||||
<value>como de</value>
|
||||
</data>
|
||||
</root>
|
@ -580,6 +580,7 @@ with
|
||||
/// Generate this list as HTML
|
||||
member this.asHtml (s : IStringLocalizer) =
|
||||
let prefs = this.listGroup.preferences
|
||||
let asOfSize = Math.Round (float prefs.textFontSize * 0.8, 2)
|
||||
[ match this.showHeader with
|
||||
| true ->
|
||||
yield div [ _style (sprintf "text-align:center;font-family:%s" prefs.listFonts) ] [
|
||||
@ -626,6 +627,18 @@ with
|
||||
| Some _ -> ()
|
||||
| None -> ()
|
||||
yield rawText req.text
|
||||
match prefs.asOfDateDisplay with
|
||||
| NoDisplay -> ()
|
||||
| ShortDate
|
||||
| LongDate ->
|
||||
let dt =
|
||||
match prefs.asOfDateDisplay with
|
||||
| ShortDate -> req.updatedDate.ToShortDateString ()
|
||||
| LongDate -> req.updatedDate.ToLongDateString ()
|
||||
| _ -> ""
|
||||
yield i [ _style (sprintf "font-size:%fpt" asOfSize) ] [
|
||||
rawText " ("; str s.["as of "].Value; str dt; rawText ")"
|
||||
]
|
||||
])
|
||||
|> ul []
|
||||
yield br []
|
||||
|
Loading…
Reference in New Issue
Block a user