|
if (FSelPos == 0) {
FindDlg->Options = FindDlg->Options >> frFindNext;
}
if (FindDlg->Options.Contains( frFindNext)) {
StartPos = FSelPos + FindDlg->FindText.Length();
S = MemLog->Lines->Text.c_str() + StartPos;
}
else {
S = MemLog->Lines->Text;
StartPos = 0;
}
FSelPos = S.Pos(FindDlg->FindText);
if(FSelPos>0) {
FSelPos = FSelPos + StartPos - 1;
MemLog->SelStart = FSelPos;
MemLog->SelLength = FindDlg->FindText.Length();
MemLog->SetFocus();
}
else {
if (FindDlg->Options.Contains( frFindNext)) {
S.sprintf( "ドキュメントの検索が完了しました",FindDlg->FindText);
MessageDlg(S, mtInformation, TMsgDlgButtons() << mbOK, 0);
}
else {
S.sprintf("'%s'が見つかりませんでした",FindDlg->FindText);
MessageDlg(S,mtError, TMsgDlgButtons() << mbOK, 0);
}
}
위의 소스는 위에서 아래로 검색을 하는 소스입니다.
가장뒤부터 검색을 하려면 어떻게 해야하나요?
FindDialog속성에서 frUpDown같은것을 변경해도..
위에서 아래로만 검색이 됩니다.
부탁드려요 ㅠㅠ
|