procedure TForm2.SynMemo1Change(Sender: TObject);
begin try
FlatButton1.Enabled :=true;
except end;End;