Code Optimierung und Frage zur Tastaturabfrage einer Memobox

[Jerry]

Hallo zusammen

Ich habe eine Memobox und möchte diese auf eine gewisse Zeilenanzahl beschränken.
Also ab der 4. Zeile darf "Enter" nicht mehr funktionieren.
Ich muss aber innerhalb meiner Memo-Box mit CTRL-Enter drücken, damit eine zusätzliche Zeile generiert wird.
Im Anhang mein Code:

Delphi-Quellcode:

procedure Tfrm_Test.mem_TestChange(Sender: TObject);
begin
  inherited;
  if mem_Test.Lines.Count > 4 then
    mem_Test.Lines.Delete(mem_Test.Lines.Count - 1);
end;

procedure Tfrm_Test.mem_TestKeyPress(
  Sender: TObject; var Key: Char);
begin
  inherited;
  if (mem_Test.Lines.Count = 4) and (Key = #$A) then  // hier Frage Wieso muss mit #$A statt #13 abgefragt werden? Ich weiss nicht was #$A ist? Habe ich mit Debug herausgefunden.
  begin
    Key := ' ';  // hier statt ' ' würde ich gerne auf Blank stellen geht aber nicht...
  end;

end;

Frage 1: Was ist #$A ? (habe ich mit Debuggen herausgefunden...
Frage 2: Statt Key auf ' ' zu setzen würde ich Key einfach gerne auf Blank setzen. '' geht aber nicht..

Kann das ganze etwas eleganter programmiert werden?

Vielen Dank!