お知らせ

電子会議

ライブラリ

パレット

Delphi FAQ検索

Delphi FAQ一覧

サンプル蔵





FDelphi FAQ
16番会議室「玉石混淆みんなで作るSample蔵」に寄せられたサンプル

"StrToFloatに標準値"





StrToIntDef と同じくデフォルトを持たせたい場合に
使用します。

function StrToFloatDef(Text: String; Value: Extended): Extended;
begin
  if not TextToFloat(PChar(Text), Result, fvExtended) then
    Result := Value;
end;

                           97/10/20(Mon) 10:17pm  STAR☆CAT(BYJ02333)

Original document by STAR☆CAT       氏 ID:(BYJ02333)


ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。

Copyright 1996-2002 Delphi Users' Forum