int FouAt, StPos, ToE;
if (re1->SelLength)
StPos = re1->SelStart + re1->SelLength;
else
StPos = 0;
ToE = re1->Text.Length() - StPos;
FouAt = re1->FindText(FindDialog1->FindText, StPos, ToE, TSearchTypes()<< stMatchCase);
if (FouAt != -1)
{
re1->SetFocus();
re1->SelStart = FouAt;
re1->SelLength = FindDialog1->FindText.Length();
}
Wytłumaczy mi ktos pokolei ten kod co jak sie dzieje zaczynam dopiero.