DevExpress での一覧、帳票等のレポート（ASPxWebDocumentViewer）のリッチテキスト情報（XRRichText）のテキストにシステム時刻（カスタム）設定のサンプルです。
現状の画面デザインはこのようになっています。
＜レポートのリッチテキスト情報（XRRichText）のテキストにシステム時刻（カスタム）設定＞
「XrRichText1」オブジェクトを選択します。
「XrRichText1」の歯車アイコンを選択し、「Html Expression」の「…」アイコンを選択します。
↓
左メニューから「関数」→「日付 / 時刻」を選択し、「GetHour」を選択します。
↓
↓
「GetHour」の引数として「Now」を選択します。
↓
同じように、「GetMinute」を選択し、「GetMinute」の引数として「Now」を選択します。
↓
同じように、「GetSecond」を選択し、「GetSecond」の引数として「Now」を選択します。
↓
同じように、「GetMilliSecond」を選択し、「GetMilliSecond」の引数として「Now」を選択します。
↓
設定内容：'<font face=ＭＳ ゴシック>’+’「ReportHeader」での「XrRichText」です。’+’2024-2025年の’+’ ’+'<font color=Blue>’+'<strong>’+’「’+[OFFICE_ID].[OFFICE_ID]+’：’+[OFFICE_ID].[OFFICE_NAME]+’」’+'</strong>’+'</font color>’+’の対象は’+[DataSource.RowCount]+’件です。’+'<br>’+’一覧です。’+’（実行日時：’+GetYear(Now())+’年’+GetMonth(Now())+’月’+GetDay(Now())+’日’+’ ’+GetHour(Now())+’：’+GetMinute(Now())+’：’+GetSecond(Now())+’：’+GetMilliSecond(Now())+’）’+'</font face>’
【サンプルプログラム（VB.Net）】
|
1 2 3 4 5 6 7 8 9 10 11 12 |
' 'XrRichText1 ' Me.XrRichText1.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Html", resources.GetString("XrRichText1.ExpressionBindings"))}) Me.XrRichText1.Font = New System.Drawing.Font("ＭＳ ゴシック", 9.75!) Me.XrRichText1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 23.0!) Me.XrRichText1.Name = "XrRichText1" Me.XrRichText1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrRichText1.SerializableRtfString = resources.GetString("XrRichText1.SerializableRtfString") Me.XrRichText1.SizeF = New System.Drawing.SizeF(1000.0!, 23.0!) Me.XrRichText1.StylePriority.UseFont = False Me.XrRichText1.StylePriority.UsePadding = False |
それでは、実行して動作確認を行います。
↓
無事、一覧、帳票等のレポート（ASPxWebDocumentViewer）のリッチテキスト情報（XRRichText）のテキストにシステム時刻（カスタム）設定が出来ました。
