ボタンのcaptionを改行するには?

解決


初心者  2005-12-08 12:21:47  No: 19116  IP: 192.*.*.*

超初心者です。
ボタンのタイトルやラベルを2行で表示したいのですが
captionで改行できませんでした。
どうしたら良いのでしょうか?

本当に超初心者なのでわかりやすい解説をお願いします。

よろしくお願い致します。

編集 削除
にしの  2005-12-08 12:30:16  No: 19117  IP: 192.*.*.*

「超初心者」の定義が曖昧で、「わかりやすい解説」は付きにくいかと思います。
人によっては、「超初心者=Delphiの基本もプログラミングの方法もわからない」と考えるでしょうし。
「超初心者」というよりも、「こうしたいので、こういうプログラムを書いたけれど、こういう結果(期待しない結果の内容)になった」という形式の方がレスがつきやすいかと。

では本題。
TButtonでは無理です。
この場合は、TBitBtnを使用します。

Button1.Caption := 'abc'#13#10'def'; //改行されない
BitBtn1.Caption := 'abc'#13#10'def'; //改行される

編集 削除
りおりお  2005-12-08 12:32:44  No: 19118  IP: 192.*.*.*

こんな感じです

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Caption := '一行目'#13#10'二行目';
  SetWindowLong(Button1.Handle, GWL_STYLE, GetWindowLong(Button1.Handle, GWL_STYLE) or BS_MULTILINE);
  Button1.Caption := '一行目'#13#10'二行目';
end;

編集 削除
初心者  2005-12-08 12:51:43  No: 19119  IP: 192.*.*.*

にしの様
BitBtnは見つけました。
オブジェクトオンスペクタのcaptionに上記'一行目'#13#10'二行目'を
書いたのですが改行は出来ませんでした。
プログラムの方からでないと改行しないのでしょうか?

りおりお様
Handoleを見つけられません。どこで設定したら良いのでしょうか?

よろしくお願い致します。

編集 削除
にしの  2005-12-08 13:05:02  No: 19120  IP: 192.*.*.*

オブジェクトインスペクタでは(デフォルトでは)無理です。
プロパティエディタを実装すればできますが、さほど重要ではないと思います。
FormのOnCreateイベントで設定すればよいかと。

編集 削除
初心者  2005-12-08 14:14:38  No: 19121  IP: 192.*.*.*

にしの様のやり方で出来ました。

ありがとうございます。

編集 削除
@っしー  2005-12-08 14:30:40  No: 19122  IP: 192.*.*.*

解決済みでなんですが、、、

フォーム上で右クリックして、「エディタで表示(V)」を選択して、テキスト表示させて、目的のTBitBtnのCaptionを

'一行目'#13#10'二行目'

のようにすることもできます。

編集 削除