ReadOnly auf true lassen und dann sowas in der art:
Delphi-Quellcode:
procedure TForm1.Memo1Enter(Sender: TObject);
begin
button1.SetFocus;
end;
sobald das memo aktiv wird lässt du den fokus einfach auf irgend was anderes springen, damit hat der anwender 0 chance da rein zu kommen
Grüße
Elmar