Mit length kannst du ja die Anzahl der Zeichen im edit rausfinden und dann einfach eine Schleife laufen lassen. Etwa so:
Delphi-Quellcode:
str:=edit1.text;
for i:= length(str) to 10 do
str:=str+'A';
So in etwa.
Erwarte das Beste und bereite dich auf das Schlimmste vor.