別のブログで書いた"Delphi / Appmethod Advent Calendar 2017" 投稿記事を一部書き直して、Qiitaに再投稿したものです。
はじめに
DataSet系+Data Controlsのコンポーネントの組み合わせで、開発しているプログラムで、数値の書式(3桁カンマ区切り)で苦労しているものがたまにあります。今回は、このあたりがTIntegerFieldのプロパティで対応できるのでその紹介と注意点を纏めます。
実装
数値の3桁カンマ区切りついては、TIntegerFieldでは、DisplayFormatプロパティを使用します。
'#,#' または '#,0' を設定します。
ただし、このままだと、編集時もカンマが入ってしまうので、
EditFormatプロパティを使用します。
'#' または '0' を設定します。
このように設定すると、カーソルがあるときは、カンマ無で、カーソルが離れると、カンマ編集された表示になります。
注意点としては、'#,#'&'#' の組み合わせだと、値が0でも、表示がブランクになります。
おわりに
今回は、数値の3桁区切りの簡単な対応として紹介していますが、DisplayFormat, EditFormat は、EditMaskと同じ書式設定が使えるようなので、
3桁区切り以外でもいろいろ書式設定ができるようです。