小数点以下の桁数について

解決


ちゃんぽん  2015-09-02 21:16:00  No: 47577  IP: [192.*.*.*]

こんにちは。
Delphi 7 で開発しています。
ちなみにOSはWindows XPです。

FormにADOQueryとDataSourceを張り付けて
ORCLEデータベースに接続しています。
ある、テーブルのフィールド(NUMBER 11,5  型)のデータを
以下のように取り出したのですが値が小数点4桁までしか採れません。
SQLplusで確認すると5桁まではいっているのですが、どうしてでしょうか。

var
  SQL1 : String;
begin
 SQL1 := 'SELECT sample1, sample2, sample3 FROM sample ';

Edit1.Text := ADOQuery1.FloatToStr(DataSource1.DataSet.Fields[1].AsFloat);

Edit1に小数点以下4桁までした表示されない。

編集    削除
通りすがり  2015-09-02 22:04:43  No: 47578  IP: [192.*.*.*]

FloatToStr関数
http://docwiki.embarcadero.com/Libraries/Seattle/ja/System.SysUtils.FloatToStr

は"有効桁数 15 の汎用数値形式を使用します。"とありますので、指定した精度まで値を文字列化したいのであれば

FloatToStrF関数
http://docwiki.embarcadero.com/Libraries/Seattle/ja/System.SysUtils.FloatToStrF

で明示的に精度を指定すればよいのではないでしょうか?

編集    削除
ちゃんぽん  2015-09-03 00:47:32  No: 47579  IP: [192.*.*.*]

通りすがりさん、ご回答ありがとうございました。
こんな関数があったのですね。
助かりました。
今後ともよろしくお願いいたします。

編集    削除