Button

[DKENT]

Здраствуйте.
В коде выдает ошибку

Подскажите пожалуйста в чем проблема

PHP код:

procedure TForm1.FormCreate(Sender: TObject);
begin
sMemo2.Clear;
sMemo1.Clear;
sMemo2.Lines.LoadFromFile('text.txt');
if sMemo2.Text = ' ' then
begin
sButton1.Enabled:=False;
sButton2.Enabled:=False;
end
else
sButton1.Enabled:=True;
sButton2.Enabled:=True;
end;

procedure TForm1.sMemo2Change(Sender: TObject);
begin
if sMemo2.Text = ' '  then
begin
sButton1.Enabled:=False;
sButton2.Enabled:=False;
end
else
sButton1.Enabled:=True; //
sButton2.Enabled:=True; //Вот на эти 2 строки ругается компилятор;
end; 


Заранее благодарен

[Alex Cones]

Может конструкции после Else заключите в логические блоки? Begin - End?

[DKENT]

Проблема не в этом!
Пробывал ошибка появляется таже)

[DIgorevich]

Проект заархивируйте и прикрепите сюда.