請問wraptext的參數詳解 |
答題得分者是:Chance36
|
dengguo
一般會員 發表:41 回覆:49 積分:23 註冊:2004-01-09 發送簡訊給我 |
任何一本介紹WRAPTEXT函數的書上都這樣寫著:
-------------------------------------------------------------
首部 function WrapText(const Line, BreakStr: string; nBreakChars: TSysCharSet; MaxCol: Integer):string; $[
功能 將字串Line用指定的字串BreakStr分離並返回。[其中: nBreakChars爲條件,Max爲最長寬度]
說明 type TSysCharSet = set of Char;
##begin
## WrapText('The rain in Spain falls mainly on the plain.', #13#10, ['.',' ',#9,'-'], 42);
## {The rain in Spain falls mainly on the}
## {plain.}
##end.
----------------------------------------------------------------------
const Line:理解為要進行分割的字串
BreakStr: string:理解為用來分割的字符
nBreakChars呢,例句中的['.',' ',#9,'-']這些參數是根據什麼來的?如何解釋
MaxCol: Integer這個好像沒什用,我在
s.Text :=WrapText(edit1.Text,#13,[',',' ',],1);中將1改成0或其它效果居然都一樣!!
請幫忙講解釋下後兩個參數的具體使用及參考,因我找了很多資料都 沒有相關說明!!謝謝!! 初學delphi,請各位多多提點!謝謝!
|
Chance36
版主 發表:31 回覆:1033 積分:792 註冊:2002-12-31 發送簡訊給我 |
dengguo 你好 function WrapText(const Line, BreakStr: string; nBreakChars: TSysCharSet; MaxCol: Integer):string;
功能 將字串Line用指定的字串BreakStr分離並返回。
----------------------------------------------------------------------
const Line:為要進行分割的字串
BreakStr: string:斷行符號,遇到它非斷不可,一般MS系統即為#13#10,Unix系統為#10而已
nBreakChars:斷行參考字元,容後說明
MaxCol: 一行最多幾個字元
當一行的字元數超過 MaxCol 時,開始往前尋找斷行參考字元,找到任何一個則從該字元後插入斷行符號,若找不到則在第MaxCol字元後插入斷行符號
|
dengguo
一般會員 發表:41 回覆:49 積分:23 註冊:2004-01-09 發送簡訊給我 |
|
dengguo
一般會員 發表:41 回覆:49 積分:23 註冊:2004-01-09 發送簡訊給我 |
發現用ExtractStrings能做到我要求:
procedure TForm1.Button1Click(Sender: TObject);
var
SL:Tstringlist;
i:Integer;
begin
SL:=Tstringlist.Create ;
ExtractStrings([','], [' '],
'j0252,j0253,j0254',SL);
for i:=0 to SL.Count-1 do
showmessage(SL.Strings[i]);
SL.Free;
end; ###############################
初學delphi,請各位多多提點!謝謝!
###############################
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |