![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
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ランキング
-
Excel-VBAでInputBox+Pulldown...
-
テキストボックスの番号を使っ...
-
初歩的な事だと思います。 Sub...
-
エクセルVBA テキストボックス...
-
EXCEL VBA で指定した範囲に入...
-
数字以外の入力をエラーにする...
-
入力フォームの値をQRコードで...
-
DataGridViewの桁数制限に関して
-
excel vba でユーザーフォーム...
-
InputBoxでキャンセルボタンを...
-
uwsc webページ内のテキストボ...
-
VBAでInputBoxの再入力をさせる...
-
vbaで同じテキストボックスを繰...
-
SSL環境でオートコンプリートを...
-
UWSCで、スクリプトの実行時間...
-
UWSC すごく初歩的な質問で申...
-
複数行の入力を受け取る方法
-
C♯初心者で、四則演算の電卓を...
-
アクセスのマクロ
-
ExcelVBAのユーザーフォームで...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA テキストボックス...
-
数字以外の入力をエラーにする...
-
テキストボックスの番号を使っ...
-
初歩的な事だと思います。 Sub...
-
なんで
-
Excel-VBAでInputBox+Pulldown...
-
私、Paiza Cloudやっているのだ...
-
VBAでInputBoxの再入力をさせる...
-
TextBoxから数字が文字...
-
EXCEL VBA で指定した範囲に入...
-
excel vba でユーザーフォーム...
-
c#でTextBoxの入力制限
-
エディットボックスの入力制限...
-
DataGridViewの桁数制限に関して
-
入力フォームの値をQRコードで...
-
X(元Twitter)で問題があり、お...
-
アクセスのマクロ
-
「イ分」・・・フンという文字...
-
DataGridView 列ごとの入力制限
-
ACCESS テキストボックスの入力...
おすすめ情報