procedure TForm4.SpeedButton9Click(Sender: TObject);
begin try
Editor.PasteFromClipboard;
except end;End;