доброго времени суток!
есть код на RichEdit в BCB 6. установлены и SynEdit и SynUniHighLighter, ругается соответственно на FindText... не понимаю как правильно использовать SearchEngine. помогите переделать код на SynEdit!
| Код |
void __fastcall TForm_Main::FindDialog1Find(TObject *Sender)
{
int FoundAt, StartPos, ToEnd;
// begin the search after the current selection
// if there is one
// otherwise, begin at the start of the text
StartPos = 0;
// ToEnd is the length from StartPos
// to the end of the text in the rich edit control
ToEnd = TSynEdit->Text.Length() - StartPos;
FoundAt = TSynEdit->FindText(FindDialog1->FindText, StartPos, ToEnd, TSearchTypes()<< stMatchCase);
if (FoundAt != -1)
{
FindDialog1->CloseDialog();
TSynEdit->SelStart = FoundAt;
TSynEdit->SelLength = FindDialog1->FindText.Length();
TSynEdit->SetFocus();
TSynEdit->Perform(EM_SCROLLCARET, 0, 0);
}
}
|
заранее спасибо! |