Hallo,
ich weiß nicht ob es mit Beten geht, aber wenn du eine ActionList auf deine Form ziehst und darin eine SelectAllAction mit dem ShortCut STRG+A anlegst, dann hilft dir beispielsweise der folgende Code:
Delphi-Quellcode:
procedure TDemoForm.SelectAllActionExecute(Sender: TObject);
begin
PostMessage(ActiveControl.Handle, EM_SETSEL, 0, -1);
end;
Grüße vom marabu