>>565
何がしたいのかよく分からないのだけどこういう事？
  if Msg.HotKey = id_SnapShot then
  begin
    if GetActiveWindow=Form1.Handle then
    begin
      Application.Minimize;
    end else begin
      Application.Restore;
      Form1.SetFocus;
    end;
  end;