練習にメモ帳を作ってみようかと思ったのですが・・・
インデント機能を追加しようとしたときに

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key=VK_RETURN then
begin
Memo1.lines.Add(' ');//エンターキーが押されたときに次のラインの先頭にタブを追加したい

end;

if Key=VK_TABthen
begin
Memo1.lines.Add(' ');//タブ押したら' 'を先頭に追加したい
end;
end;


と、言うふうに書いてみたのですが、実行すると
ｴﾝﾀｰｷｰを押したときは

aniki　　　　　//一行目、ここでエンターを押した
　　　　　　　　//二行目、「' '」が追加されている
　　　　　　　//三行目、ここにカーソルが来てしまう

タブを押したときに至っては全く反応無しという有様なのですが、どのように書けばいいのでしょうか？