JosephLiu77
一般會員
![](./myimg/board/mystar_empty.gif)
![](images/icon_photo_none.gif) 發表:11 回覆:8 積分:3 註冊:2003-02-06
發送簡訊給我
|
要怎麼樣才能快速的轉換英文字串?
把所有的小寫改成大寫,大寫改成小寫
|
RaynorPao
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://delphi.ktop.com.tw/download.php?download=upload/48c9d66ac5033_KTOP-%E5%8C%85%E5%AD%90%28%E7%9C%BC%E9%8F%A1%29-Q-100x100.jpg) 發表:139 回覆:3622 積分:7025 註冊:2002-08-12
發送簡訊給我
|
引言:
要怎麼樣才能快速的轉換英文字串?
把所有的小寫改成大寫,大寫改成小寫
>>< face="Verdana, Arial, Helvetica"> JosephLiu77 你好:
請參考以下的範例程式碼
< class="code">
AnsiString sz="AbcdefGHIJklMnOpQrSTUvwxyZ";
for(int i=1; i<=sz.Length(); i )
{
if(islower(sz[i]))
{
sz[i]=toupper(sz[i]);
}
else
{
sz[i]=tolower(sz[i]);
}
}
ShowMessage(sz);
-- Enjoy Researching & Developing --
------ -- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
|
axsoft
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://earthday.link.org.tw/images/EARTHfinal.gif) 發表:681 回覆:1056 積分:969 註冊:2002-03-13
發送簡訊給我
|
引言:
要怎麼樣才能快速的轉換英文字串?
把所有的小寫改成大寫,大寫改成小寫
>>< face="Verdana, Arial, Helvetica">
JosephLiu77您好: 試試看下面的幾個方法 方法一.
void __fastcall TForm1::FormCreate(TObject *Sender)
{
AnsiString sz="AbcdefGHIJklMnOpQrSTUvwxyZ";
Label1->Caption=UpperCase(sz); //轉成大寫
Label2->Caption=LowerCase(sz); //轉成小寫
} 方法二.
void __fastcall TForm1::FormCreate(TObject *Sender)
{
AnsiString sz="AbcdefGHIJklMnOpQrSTUvwxyZ";
Label1->Caption=sz.UpperCase(); //轉成大寫
Label2->Caption=sz.LowerCase(); //轉成小寫
} 方法三.
void __fastcall TForm1::FormCreate(TObject *Sender)
{
char MyString[]="AbcdefGHIJklMnOpQrSTUvwxyZ";
AnsiString sz(MyString);
Label1->Caption=sz.UpperCase();
Label2->Caption=sz.LowerCase();
} 方法四.
如果你的應用程式有參數傳入時,可能會因為參數的大小寫差異,
造成無法Work,可以用下面的方法
void __fastcall TForm1::FormCreate(TObject *Sender)
{
if( (ParamCount() >= 1) && (ParamStr(1).UpperCase() == "-ISX"))
{
}
}
/*開心的事情別隱藏在心裡,分享給別人知道會更快樂的*/
/*得到新知識別隱藏在心裡,分享給別人了解會更清楚的*/ 發表人 - axsoft 於 2003/08/18 16:48:13
|
JosephLiu77
一般會員
![](./myimg/board/mystar_empty.gif)
![](images/icon_photo_none.gif) 發表:11 回覆:8 積分:3 註冊:2003-02-06
發送簡訊給我
|
感謝各位大大的指導,axsoft版主,你好像誤會我的意思了,我說的字串是大小寫參雜,要把字串裡面的小寫改成大寫,大寫改成小寫,RaynorPao版主提供的範例程式碼剛好就是我需要的,再次感謝
|
axsoft
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://earthday.link.org.tw/images/EARTHfinal.gif) 發表:681 回覆:1056 積分:969 註冊:2002-03-13
發送簡訊給我
|
原始問題:
引言:
要怎麼樣才能快速的轉換英文字串?
把所有的小寫改成大寫,大寫改成小寫
>>< face="Verdana, Arial, Helvetica"> 引言:
感謝各位大大的指導,axsoft版主,你好像誤會我的意思了,我說的字串是大小寫參雜,要把字串裡面的小寫改成大寫,大寫改成小寫,RaynorPao版主提供的範例程式碼剛好就是我需要的,再次感謝
>>< face="Verdana, Arial, Helvetica"> JosephLiu77您好: 您並未說明清楚您的需求是字串是大小寫參雜喔!建議您下次寫清楚些,不然會浪費別人的時間與討論區版面
/*開心的事情別隱藏在心裡,分享給別人知道會更快樂的*/
/*得到新知識別隱藏在心裡,分享給別人了解會更清楚的*/
|
JosephLiu77
一般會員
![](./myimg/board/mystar_empty.gif)
![](images/icon_photo_none.gif) 發表:11 回覆:8 積分:3 註冊:2003-02-06
發送簡訊給我
|
哈哈 ![]() ,
|
axsoft
版主
![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif) ![](./myimg/board/mystar.gif)
![](http://earthday.link.org.tw/images/EARTHfinal.gif) 發表:681 回覆:1056 積分:969 註冊:2002-03-13
發送簡訊給我
|
引言:
哈哈 ,>但是我想每個人都是一面鏡子,問題討論最後的結果如何? 往往跟問問題的人有沒有把問題說清楚,和提供答案的人有沒有考慮較合理、周詳的答案都有很大的關係吧>
>>< face="Verdana, Arial, Helvetica">
JosephLiu77 您好:
我並沒有生氣,也不需要生氣,發問者能得到所需要的答案才是最重要的,討論問題本來就是互動的,如果發問者能很貼心的詳述問題,回答問題的人也能比較容易抓住重點回答,並不需要玩『猜謎遊戲』...這樣不是很好嗎? 在這幫忙回問題的人都是義務幫忙的,並無領薪給的..
我也很贊同您的說法(紅色的部分),恭喜您有滿意的答案 < class="code">
/*開心的事情別隱藏在心裡,分享給別人知道會更快樂的*/
/*得到新知識別隱藏在心裡,分享給別人了解會更清楚的*/
|