O mesmo problema só que eu não estou entendendo. A função "Bloqueia" vai desativar e ativar os elementos de edição, mas porque está dando problema no ";"?
procedure TForm1.bloquear;
begin
txt_Nome.Enabled := not txt_Nome.Enabled;
txt_Email.Enabled := not txt_Email.Enabled;
txt_Telefone.Enabled := not txt_Telefone.Enabled;
txt_Obs.Enabled := not txt_Obs.Enabled;
speedbtn_InserirFoto := not speedbtn_InserirFoto.Enabled; //aqui - E2010 de novo...
end;