No.2ベストアンサー
- 回答日時:
こんにちは。
こんな感じではどうでしょう?
var r: Currency;
begin
r := StrToFloat(Edit1.Text);
Edit2.Text := Format('%6.0n',[r]);
end;
↓こちらを参考にしました。
http://forum.nifty.com/fdelphi/faq/00149.htm
参考URL:http://forum.nifty.com/fdelphi/faq/00149.htm
この回答へのお礼
お礼日時:2003/06/09 15:13
Currency型でのFormatなら一度に変換できるのですね。
また、参考URLも大変勉強になりました。
どうもありがとうございました。
No.3
- 回答日時:
#1です。
#2さんの回答の方がスマートですね。
それに100000を入力しても100,000になるし。
Format関数にあまり慣れてないので...
#1,#2、どちらの回答でも整数を扱うにもかかわらず
Floatがでてくるんですね。
Delphiの仕様なのだろうか。
No.1
- 回答日時:
ちょっと強引わざですが、こんなのはどうでしょうか。
sをstringで定義しておき、
Edit1に入力した数値を、Edit2に返すという仕様です。
s := FormatFloat('##,##0', StrToInt(Edit1.Text));
s := StringOfChar(' ', 6) + s;
Edit2.Text := Copy(s, Length(s)-6+1, 6);
これだと100000を入力すると、00,000になりますが、
数値は5桁以内に限られるならこれでいいかも。
もっとスマートな方法があればいいのですが。
この回答へのお礼
お礼日時:2003/06/06 20:54
こんなに早く回答していただいて、
ありがごうございます。
とても参考になります。
これよりスマートとなると、2行以内での実現ですから、
ないような気がしますね。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- PDF C#でfloatを整数部、小数部とも桁数固定で文字表示したい 2 2022/07/28 09:37
- Visual Basic(VBA) Excel VBA 書式変更で困ってます。 オートフィルターの日付フィルターを用いて データの絞り込 2 2022/07/26 22:16
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/02 10:20
- Excel(エクセル) エクセルの数式で教えてください。 2 2023/02/10 11:41
- Excel(エクセル) エクセルの数式で教えてください。 5 2023/02/10 15:11
- Excel(エクセル) EXCELの書式設定を固定することはできませんか? 5 2023/06/20 17:05
- Excel(エクセル) エクセルのセルの書式設定・ユーザー定義の条件設定について 1 2022/08/17 21:56
- Excel(エクセル) Excel 特定セルの数値を参照したセルの0表示が空白にならないのはどうしてか? 3 2022/04/28 22:23
- Excel(エクセル) エクセルの数式について教えてください。 2 2023/03/04 09:54
- Excel(エクセル) 条件付き書式の設定方法を教えて下さい。 2 2023/04/14 18:12
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
初歩的な事だと思います。 Sub...
-
Excel-VBAでInputBox+Pulldown...
-
エクセルVBA テキストボックス...
-
数字以外の入力をエラーにする...
-
テキストボックスの番号を使っ...
-
InputBoxでキャンセルボタンを...
-
DataGridViewの桁数制限に関して
-
DataGridView 列ごとの入力制限
-
c#でTextBoxの入力制限
-
FIREFOXでWebページを表示でき...
-
エディットボックスの入力制限...
-
EXCEL VBA で指定した範囲に入...
-
VBAでInputBoxの再入力をさせる...
-
EXCEL VBAで、URLを入力して、...
-
excel vba でユーザーフォーム...
-
インプットボックスでの日付入力
-
入力関数を使うがコンソール上...
-
入力フォームへ、データを自動...
-
WebフォームのIMEモードを入力...
-
accessで該当するレコードがな...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA テキストボックス...
-
テキストボックスの番号を使っ...
-
数字以外の入力をエラーにする...
-
初歩的な事だと思います。 Sub...
-
EXCEL VBA で指定した範囲に入...
-
Windowsのアプリ開発ってなんの...
-
入力フォームの値をQRコードで...
-
教えて!全角文字「μ」の半角
-
Excel-VBAでInputBox+Pulldown...
-
VBAでInputBoxの再入力をさせる...
-
エディットボックスの入力制限...
-
TextBoxから数字が文字...
-
VBAの質問になります メッセー...
-
指定した演算を実施の結果を表...
-
excel vba でユーザーフォーム...
-
アルファベットGの小文字の入力
-
DataGridView 列ごとの入力制限
-
accessで該当するレコードがな...
-
c#でTextBoxの入力制限
-
VBA R1C1形式で変数の入力について
おすすめ情報