Escape the Room - Das Delphi-IDE-Spiel

[himitsu]

Der Quellcode für ein neues VCL-Projekt:

Code:

object Panel1: TPanel
  Left = 96
  Top = 112
  Width = 145
  Height = 97
  Caption = 'Panel1'
  PopupMenu = PopupMenu1
  TabOrder = 1
end
object PopupMenu1: TPopupMenu
  Left = 120
  Top = 136
  object N11: TMenuItem
    Caption = '1'
  end
  object N21: TMenuItem
    Caption = '2'
    OnClick = N21Click
    object N41: TMenuItem
      Caption = '4'
    end
    object N51: TMenuItem
      Caption = '5'
    end
  end
  object N31: TMenuItem
    Caption = '3'
  end
end

Text kopieren und im Form-Designer einfügen (Strg+V ... nicht in der Codeansicht)

und vorher die Methode "N21Click" implementieren oder nachher mit Item "2" verknüpfen.

Delphi-Quellcode:

procedure TForm23.N21Click(Sender: TObject);
begin
  Beep;  // hier einen Haltepunkt setzen
end;

Jetzt noch den haltepunkt setzen, F9 drücken, im Programm das Popup öffnen und die Maus über "2" halten...
Das Programm vorher am Besten noch maximieren, so daß dessen Form die IDE verdeckt. (aber eigentlich würde ich ja eher davon abraten, wenn man keinen Spaß haben will )



Sooooooooo, jetzt versucht mal mit Alt+Tab in den Debugger zu wechseln, per Task-Manager (wechseln zu) oder per Klick auf die Taskleiste.

Viel Spaß noch.




PS: Das Projekt mit'm Task-Manager abschießen geht nicht, wenn es im Debugger angehalten ist.
Delphi abschießen oder Abmelden, bzw, "Task beenden" im Task-Manager und dann bei der Delphi-Debug-Beenden-Frage und vorallem beim "Soll ich speichern?" ganz schnell ja sagen.
Wenn Windows beim Runterfahren was von "abschießen" fragt, dann abbrechen.

Bekannte Mindestvoraussetzungen:
- XE bis XE7
- Windows 7
- mit oder ohne RDP/TeamViewer dazwischen

Ob es auch in anderen Umgebungenen "funktioniert", kann ich nicht sagen ... aber vielleicht ihr.



ACHTUNG: Vorher alles Wichtige speichern, nicht daß was verloren geht.