procedure TForm4.SpeedButton12Click(Sender: TObject);
begin try
Editor.Redo;
except end;End;