遇到個問題~ 現在要輸入一串 字串 然後 只要 遇到  \  就把它獨立丟到個字串變數裡面

我有使用 AnsiPos 但是 AnsiPos 只能抓到第1個 位置 我該如何去抓到第2個 或是第3甚至第4個呢?

PosEx函數！查一下KTOP不少範例，如果還有問題，請把CODE貼上來～
===================引 用 elva349 文 章===================
遇到個問題~ 現在要輸入一串 字串 然後 只要 遇到 \ 就把它獨立丟到個字串變數裡面

我有使用 AnsiPos 但是 AnsiPos 只能抓到第1個 位置 我該如何去抓到第2個 或是第3甚至第4個呢?

不好意思~我是使用bcb 6 我找不到您說的PosEx 的說明耶 我搜尋了站內的 看不太懂!
抱歉 我初學者...我都是看我身旁的書學的...

在BCB也可用Pos函數，把你有問題的CODE重點部分貼上來，站內的先進可以幫你一起研究，不貼CODE有時談不出問題癥結點。
===================引 用 elva349 文 章===================
不好意思~我是使用bcb 6 我找不到您說的PosEx 的說明耶 我搜尋了站內的 看不太懂!
抱歉 我初學者...我都是看我身旁的書學的...

===================引 用 Stallion 文 章===================
在BCB也可用Pos函數，把你有問題的CODE重點部分貼上來，站內的先進可以幫你一起研究，不貼CODE有時談不出問題癥結點。
===================引 用 elva349 文 章===================
不好意思~我是使用bcb 6 我找不到您說的PosEx 的說明耶 我搜尋了站內的 看不太懂!
抱歉 我初學者...我都是看我身旁的書學的...

謝謝~ 我現在是使用這樣的做法來取得

int index ;
const int Max = 10; // 最多支援的字串數
int i=0; //字串指標
AnsiString str[Max];

for (int h=0;h{str[h]="";}
str[i]=Edit1->Text;
i=i 1;

for(AnsiString A(str[0]) ; (A.AnsiPos('\\')||A.Length())!=0 ; i )
{
if (A.AnsiPos('\\') != 0)
{
index=A.AnsiPos('\\') ;
str[i]=A.SubString(1,index-1);
A.Delete(1,index);
}
else
{ str[i]=A;
A.Delete(1,A.Length()) ; }
}
= =" 我還是找不到 PosEx 怎麼用...

1.貼程式碼請依照版規！你沒發現你的程式碼少了很多東西嗎？
2.BCB是使用Pos函數！Delphi可以使用Pos以及PosEx函數。

用TStringList 來分割應該最方便

void __fastcall TForm1::Button1Click(TObject *Sender)
{
TStringList* TempList=new TStringList();
try{
TempList->Delimiter="\";
TempList->DelimitedText="ABC\\EEE\\WWW";
Edit1->Text=TempList->Strings[0];
}
__finally{
delete TempList; // destroy the list object

}



===================引 用 elva349 文 章===================
遇到個問題~ 現在要輸入一串 字串 然後 只要 遇到 \ 就把它獨立丟到個字串變數裡面

我有使用 AnsiPos 但是 AnsiPos 只能抓到第1個 位置 我該如何去抓到第2個 或是第3甚至第4個呢?

===================引 用 Stallion 文 章===================
1.貼程式碼請依照版規！你沒發現你的程式碼少了很多東西嗎？
2.BCB是使用Pos函數！Delphi可以使用Pos以及PosEx函數。

<textarea class="cpp" rows="10" cols="60" name="code"> int index ; const int Max = 10; // 最多支援的字串數 int i=0; //字串指標 AnsiString str[Max]; for (int h=0;h{str[h]="";} str[i]=Edit1->Text; i=i 1; for(AnsiString A(str[0]) ; (A.AnsiPos('\\')||A.Length())!=0 ; i ) { if (A.AnsiPos('\\') != 0) { index=A.AnsiPos('\\') ; str[i]=A.SubString(1,index-1); A.Delete(1,index); } else { str[i]=A; A.Delete(1,A.Length()) ; } }</textarea>
是指這樣嗎? 先試試 因為 沒有預覽功能 我怕發錯

http://delphi.ktop.com.tw/board.php?cid=31&fid=79&tid=28881
有POS應該就可以有POSEX
請參照以上DELPHI源碼

===================引 用 mflyy 文 章===================
用TStringList 來分割應該最方便

<textarea class="cpp" rows="10" cols="60" name="code">void __fastcall TForm1::Button1Click(TObject *Sender) { TStringList* TempList=new TStringList(); try{ TempList->Delimiter="\"; TempList->DelimitedText="ABC\\EEE\\WWW"; Edit1->Text=TempList->Strings[0]; } __finally{ delete TempList; // destroy the list object } </textarea>



===================引 用 elva349 文 章===================
遇到個問題~ 現在要輸入一串 字串 然後 只要 遇到 \ 就把它獨立丟到個字串變數裡面

我有使用 AnsiPos 但是 AnsiPos 只能抓到第1個 位置 我該如何去抓到第2個 或是第3甚至第4個呢?

===========================================================================
多謝了~ 我把你的 "\" 改成 '\\' 就可以過了~
但是想請問你
try 跟 __finally 是什麼意思阿?
還有
<textarea class="cpp" rows="10" cols="60" name="code">delete TempList 跟 TempList->Free()</textarea>
有什麼不同呢?

編輯記錄

你的問題應該是解決了!!

至於 try .. ____finally 的應用 是另一個問題
BCB Help 上有詳細說明,或者網上搜尋一下..應該有很多資訊
貼一段Help的資料給你參考

The try keyword is supported only in C programs. Use __try in C programs. C also allows __try.
A block of code in which an exception can occur must be prefixed by the keyword try. Following the try keyword is a block of code enclosed by braces. This indicates that the program is prepared to test for the existence of exceptions. If an exception occurs, the program flow is interrupted. The sequence of steps taken is as follows:
The program searches for a matching handler
If a handler is found, the stack is unwound to that point
Program control is tranferred to the handler
The __finally keyword specifies actions that should be taken regardless of how the flow within the preceding __try exits.

至於 delete TempList; 及 TempList->Free ; 都可達到相同的效果..
若想深入探討,可另行提問!!