請問一下在delphi中，如何在不同同宗實作文本自動換行？
比如我輸入了一行字，我希望按一下button按鈕，就會輸出，但是由于字串太長，不能完全輸出，如何解決這個個問題？
uj5u.com熱心網友回復：
輸出到哪里？Edit？Memo？Label？Form本身？……說清楚點哦uj5u.com熱心網友回復：
btn.caption:='xxx'+$d+'yyy';uj5u.com熱心網友回復：
輸出時截取字串加“#13”換行procedure TForm1.btn1Click(Sender: TObject);
var
str:string;
i,j:Integer;
begin
str:='12345678987654321' ;
j:=8;
i:=Length(str);
ShowMessage(Copy(str,1,j)+#13+Copy(str,j+1,i));
end;
是這個意思嗎？
uj5u.com熱心網友回復：
最簡單的辦法：------------------------以下是轉載的，出處忘記了---------------------
TButton和TBitBtn都不能改背景色。
要讓Caption分行顯示，TBitBtn可以，TButton不行。
方法是，按Alt+F12切換到DFM的原始碼，找到BitBtn，在Caption那項要換行的地方插入#13，
比如'BitBtn1'#13'abc'，再按Alt+F12切換回來，就可以看到'BitBtn1'和'abc'分行顯示。
uj5u.com熱心網友回復：
4年前的貼，樓主？uj5u.com熱心網友回復：
這么古老的帖子都能翻出來啊
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/84786.html
標籤：VCL組件開發及應用