14/05/08 08:09:33.30 Mn1gWHfA.net
>>882
アドバイスありがとうございます。
ですが効果が無いようです。
フォームにButton1を貼り付け、次のコードを実行しました。
Button1.Text := 'あいうえおかきくけこ';
Button1.Canvas.Font.Assign(Button1.Font);
Button1.Width := Button1.Canvas.TextWidth(Button1.Text);
デスクトップアプリケーションの方は'あ'と'こ'が欠けた状態になりました。
これは枠の分を考慮していないので当然の結果です。
モバイルアプリケーションでは'あいうえお…'となりました。