Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls
    Delphi
    by Sharky, 10. Jan 2003
  CaretPos liefert auch die die Zeile und Spalte zurück.
  
  
  procedure TForm1.RichEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
  begin
  with (Sender AS TRichEdit).CaretPos do
  begin
  Label1.Caption := Format('(%d, %d)',)
  end;