procedure TForm2.LoadPlugIns(Sender: TObject);
begin try
if Sender<>nil then play_snd(1);
execute_plugin_cmd(TMenuItem(Sender).Hint);
except end;End;