Oha...
Danke für den Tipp mit dem Self - ich habe diesen Bezeichner schon öfter gesehen, aber bislang keine Erklärung dafür gefunden, wie ich ihn verwenden kann (und vermeide ihn daher lieber, weil ich nicht weiß, wie er funktioniert) - suche ich in der Bibliotheken-Referenz im Index danach, gibt es keinen Eintrag... auch im Quelltext und mit F1 darauf zeigt es mir keine Hilfethemen dazu an.
Ich habs jetzt so gemacht und es funktioniert
Delphi-Quellcode:
with edit1 do
if canFocus then begin
setFocus;
text:=key; //neue Eingabe immer leeres Textfeld, sonst SelStart:=length(text)+1;
SelStart:=2; //weil es sonst den Cursor für weitere Eingaben zunächst an die erste Stelle im Edit setzt
end;
key:=#0;