помогите с программой на delphi

вроде все правильно написал, но выдает ошибку
вот строка
procedure TForm1.FormCreate(Sender: TObject);

пишет ошибку: Ожидается '=' но найдено ')'

срочно нужна помощь