Suche in einer Memo die Gruppe, in der mein Cursor ist

[torud]

Hallo r2c2,

ich denke wirklich, dass ich mich falsch ausgedrückt habe. Das mit der Stringliste kann man getrost weglassen. Ich habe Deinen Code mal erweitert, da ich den Namen gleich in der Schleife ermitteln will. Aber leider klappt es nicht.

Delphi-Quellcode:

    for i := MainForm.SynEdit1.CaretX downto 0 do
      begin
        if MainForm.SynEdit1.Text[i] = '{' then
        begin
          akt:=i;
          for k := akt downto 0 do
            begin
              if MainForm.SynEdit1.Text[k] = '}' then
                name:=Trim(MidStr(MainForm.SynEdit1.Text,k+1,akt));
                ShowMessage(name);
                break;
            end;
        end;
      end;

Da scheint noch was im argen zu sein. Statt der Memo benutze ich die SynEdit-Komponente. Da diese kein SelPos bietet, habe ich es mal mit CaretX probiert. Irgendwo muckerts aber noch. Meine Messagebox bleibt noch leer...