ImageEnViewToolbar1.KeyboardShortcuts := False;

procedure TMainForm.ImageEnViewToolbar1ActionExecute(Action: TBasicAction; var Handled: Boolean);
begin
  // override save handling
  if Action is TImageEnViewSave then
  begin
    SaveCurrentImage();
    Handled := True;
  end;
end;

procedure TMainForm.ImageEnViewToolbar1ActionUpdate(Action: TBasicAction; var Handled: Boolean);
begin
  // Disable opening once we have a valid image
  if Action is TImageEnViewPromptToOpen then
  begin
    TImageEnViewPromptToOpen(Action).Enabled := ImageEnView1.IsEmpty2;
    Handled := True;
  end;
end;