TTimer und Edits ?

[Tommy1988]

nunja.. so kann ich recht wenig damit anfangen. vielleicht eni kleines codebeispiel?

edit:

habe hier was gefuden weis aber nicht obs korrekt ist (sieht für mich jedenfalls richtig aus)

Delphi-Quellcode:

procedure TForm1.Memo1KeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Edit1.Text := IntToStr(Memo1.SelStart);
end;

procedure TForm1.Memo1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Edit1.Text := IntToStr(Memo1.SelStart);
end;