掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
FieldのDisplayFormatを有効にするには? (ID:39891)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
いつもお世話になっております。 Delphi2010+XP SP3で開発しております。 Queryコンポーネントの項目の追加でDisplayFormatが設定できるのですが プロパティ等の設定をなるべくプログラム内で行いたいので、 色々と調べながら以下のプログラムを作成したのですがDisplayFormatが どうしても有効になりません。 何か足りない設定や処理があるのかもしれませんので、どなたか分かる方 がいらっしゃいましたらご教授して頂けると助かります。 procedure TfrmTest.FormCreate(Sender: TObject); var TKingaku:TField; TFltKin:TFloatField; begin Query1.FieldDefs.Add('KINGAKU',ftFloat); TKingaku:= Query1.FieldDefs.Find('KINGAKU').CreateField(nil); TFltKin:=TFloatField.Create(TKingaku); TFltKin.FieldName:='KINGAKU'; TFltKin.DisplayFormat:='#,###'; Query1.Fields.Add(TFltKin); end; 本当はフィールドがいっぱいありますが、動作確認の為に１つのフィールド でテストを行っております。 金額を表示するので、カンマを入れたいです。 データベースの『KINGAKU』はフィールド名です。 以上、宜しくお願い致します。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.