Frage zu SynEdit.

[Sharky]

Zitat von werfux:

Hallo ich habe keine Ahnung ob ich jetzt mit meiner Frage in der richtigen Rubrik hier gelandet bin....

Hai werfux,

ersteinmal "Herzlich Willkommen in der DelphiPRAXIS".

und Du bist in der richtigen Sparte

Ich habe das eben zum testen einfach mal so gemacht:

Delphi-Quellcode:

procedure TForm1.SynEdit1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  StatusBar1.Panels[0].Text :=Format('Ln %d', [SynEdit1.CaretY]);
end;

procedure TForm1.SynEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  StatusBar1.Panels[0].Text :=Format('Ln %d', [SynEdit1.CaretY]);
end;

Also einfach im .OnKeyUp und OnKeyDown die Possition des Carets in der Statusbar anzeigen.