Insertar dato en Tabla Paradox

[Abuelo7]

Hola amigos.

Tengo una tabla con 2 campos, Usuario y Fecha.

Lo que quiero es insertar en el campo Usuario el contenido de un Edit1.Text

He hecho un código pero no me funciona.

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
        if Key=#13 then
 begin
        Table1.Open;

        Table1.Append;
        Table1.fieldByName('Usuario').Value := Edit1.Text;

        end;
 begin
        Table1.Close;
        Edit1.Text :='';

        end;
        end;

end.

Que hago mal?

Gracias

Manuel