TReplaceDialog

code_pilot

Hey Leudde!
Könnt ihr mir mal helfen, ich schreibe nämlich an einem Editor der u.a. auch die Replace-Funktion haben soll. Aber wie ersetze ich denn nun was damit im Editorfeld??? Also wenn der User z.B. auf Ersetzen klickt soll er ja nur einen und wenn er auf Alles ersetzen klickt soll er alle Begriffe im gesamten Text ersetzen, aber wie soll das gehen???

Folgender Code funktioniert nicht :(:

ReplaceDialog->Position = Point(Editor->Left + Editor->Width, Editor->Top);
        ReplaceDialog->Execute();
        int SelPos = Editor->Lines->Text.Pos(ReplaceDialog->FindText);
        if (SelPos > 0)
        {
                Editor->SelStart = SelPos - 1;
                Editor->SelLength = ReplaceDialog->FindText.Length();
                Editor->SelText = ReplaceDialog->ReplaceText;
        }

HELFT MIR BITTEEEEEE!!!

So auf die Schnelle kann ich dir da auch nicht helfen:

Aber du könntest dir mal das Beispiel in der BCB-Hilfe über den TFindDialog und zwar das Beispiel:

Position, Execute, FindText, OnFind, SelStart, SelLength (Beispiel)

Anschauen.

Das kann sehr Hilfreich sein wenn man sich deinen Code anschaut.
Denn du solltest vielleicht das OnFind-Erreigniss dir zu nutze machen das auch dem TReplaceDialog zur Verfügung steht!!

C U Evilissimo