Auslesen, wo man sich in einem Memo befindet...

[himitsu]

Also zum auslesen der aktuellen Postition hatte ich mir mal sowas gebastelt ... statt Memo1.SelStart könnte man ja auch 'ne andere Position verwenden.

Delphi-Quellcode:

  i := 0;  i2 := 0;
  While i < Memo1.Lines.Count do Begin
    Inc(i2, Length(Memo1.Lines.Strings[i]));
    If i2 < Memo1.SelStart Then Break;
    Inc(i);
  End;

  > Die aktuelle Zeile ist i.

Aber hier könnte man es so machen - einfach jede Zeile einzeln durchsuchen

Delphi-Quellcode:

  If Memo1.Lines.IndexOf('dein gesuchtes Wort') > 0 Then Begin
    For i := 0 to Memo1.Lines.Count - 1 do Begin
      If Pos('dein gesuchtes Wort', Memo1.Lines.Strings[i]) > 0 Then Break;
      Inc(i);
    End;
    > Die Position ist i.
  End Else > nichts gefunden