[Страдалецъ]

1. Слово Text зарезервировано в Delphi, поэтому не используйте переменные с таким именем.
2.

Код:

{$R *.dfm}

begin

begin здесь не в тему.