Hallo Klaus,
was ist, wenn du im Programm Memo.SelStart setzt?
Ich würde das Memo durch ein RichEdit ersetzen:
Delphi-Quellcode:
procedure TDemoForm.RichEditSelectionChange(Sender: TObject);
begin
with Sender as TRichEdit do
Edit.Text := Lines[CaretPos.Y];
end;
Freundliche Grüße