データベースの内容を、違う形でTEditに表示する方法 (ID:36867)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 いろいろな方法は有りますが、 1,2と決まっているのなら、関数を使えばいかがですか？ procedure getHoge(AI:Integer):String; begin case AI of 1: result := '受諾'; 2: result := '拒否'; else result := '不明'; end; end; として、 Edit1.Text := getHoge(FieldByName('Hoge').AsInteger);