Sie kennen die Windows-Boxen, in denen Sie nur eines können?

Lassen Sie uns dies auf die nächste Stufe bringen!

Herausforderung

Erstellen Sie ein Dialogfeld mit einer Schaltfläche, die Ihrem Cursor überall folgt!

Technische Daten

Es dürfen keine Eingaben gemacht werden. Es kann entweder STDOUT oder STDERR ausgegeben werden. Sie müssen ein Fenster mit einer Schaltfläche öffnen (es ist kein Text erforderlich, der Text kann jedoch entweder im Fenstertitel, im Dialogfeld oder in der Schaltfläche enthalten sein). Die Schaltfläche muss anklickbar sein und muss immer unter Ihrem Cursor stehen, damit Sie nur darauf klicken können. Wenn Sie auf klicken, kann es alles tun, was Sie wollen, aber machen Sie es bitte nicht zum Absturz eines Computers, da ich dies testen werde ... Das Dialogfeld muss so lange geöffnet bleiben, wie die Schaltfläche nicht gedrückt wird, muss es aber nicht Schließen, wenn die Schaltfläche geschlossen ist.

Annahmen, die Sie treffen können

• Sie können davon ausgehen, dass der Cursor im Zeichenbereich bleibt.
• Sie können davon ausgehen, dass das Fenster im Fokus bleibt, aber Sie dürfen das Fenster nicht unscharf stellen, solange die Taste nicht gedrückt wird.

Beispiel Pseudocode

Hier ist ein Beispiel für einen Pseudocode:

Open Dialog Box
Add Button to Dialog Box at position X, Y
WHILE True:
    SET Dialog Box to CursorX - X, CursorY - Y

Testfälle können für diese Herausforderung nicht bereitgestellt werden

Dies ist eine Code-Golf-Herausforderung, daher gewinnt die kürzeste gültige Einsendung bis zum 14. März (Pi-Tag)!

MATLAB, 86 63 Bytes

set(warndlg,'WindowButtonM',@(s,e)movegui(get(0,'Po')-[99,20]))

Diese Lösung nutzt die (normalerweise ärgerliche) Möglichkeit von MATLAB, Namen von Teileigenschaften zu verwenden, solange das bereitgestellte Teil nur für die Eigenschaft von Interesse eindeutig ist.

Diese Lösung verwendet das eingebaute Symbol warndlg, um einen Warndialog mit der Schaltfläche "OK" zu erstellen. Diese Funktion gibt ein figureHandle zurück, mit dem wir den WindowButtonMotionFcnCallback setzen können (unter Verwendung des Kurznamens 'WindowButtonM').

Der Rückruf, der jedes Mal ausgewertet wird, wenn der Cursor innerhalb des Fensters bewegt wird, erhält die aktuelle Position des Cursors (unter Verwendung der PointerLocationEigenschaft des Stammgrafikobjekts unter Verwendung seines Kurznamens 'Po'). Wir aktualisieren dann die Positionder Figur, moveguiindem wir die neue Position der Figur nach dem Anwenden eines Offsets von [99, 20]so festlegen, dass der Cursor auf der Schaltfläche platziert wird.

Wenn Sie zum Schluss auf die Schaltfläche klicken, wird die Figur gelöscht und alle Rückrufe werden automatisch freigegeben.

C # (Windows Form Application), 200 bis 114 Byte

void F(){var p=Cursor.Position;MouseMove+=(r,t)=>{Controls.Add(new Button());Location=new Point(p.X-30,p.Y-40);};}

Ungolfen

void F()
{
     Controls.Add(new Button());

     MouseMove += (r, t) =>
     {
        var p = Cursor.Position;
        Location = new Point(p.X - 30, p.Y - 40);
     };
}

Alte 200-Byte-Lösung:

public void F(){var t=this;var b=new Button();b.Click+=delegate{t.Close();};t.Controls.Add(b);t.Show();for(;;){Application.DoEvents();t.Location=new Point(Cursor.Position.X-30,Cursor.Position.Y-40);}}

Ungolfen

    public void F()
    {
        var t = this;
        var b = new Button();

        b.Click += delegate
        {
            t.Close();
        };

        t.Controls.Add(b);
        t.Show();

        for (;;)
        {
            Application.DoEvents();
            t.Location = new Point(Cursor.Position.X - 30, Cursor.Position.Y - 40);
        }
    }

AutoHotkey, 122 115 Bytes

MsgBox
WinWait,%A_ScriptName%
Loop{
MouseGetPos,x,y
WinGetPos,a,b
ControlGetPos,c,d,,,Button1
WinMove,x+a-c,y+b-d
}

Java 7, 294 289 286 264 220 Bytes

import java.awt.*;public class B extends java.applet.Applet{Button b;public B(){add(b=new Button());}public void paint(Graphics g){Point p=MouseInfo.getPointerInfo().getLocation();b.setLocation(p.x-9,p.y-65);repaint();}}

-22 Bytes dank MouseInfo (von Zavada gestohlen ) Ich mag die awt-Bibliotheken nicht>.>

Ich habe 44 Bytes gespart, indem ich die Hauptmethode hier entfernt habe. Die Hauptmethode wird nicht benötigt, wenn diese als Applet gestartet wird. Dies kann über das "Run As Java Applet" von eclipse oder durch Deaktivieren des Sicherheitsmanagers und Verwenden des Appletviewer , der mit dem JDK geliefert wird , erreicht werden (es sei denn, Sie können Applets noch in Webbrowsern anzeigen. Ich glaube, Chrome lässt dies nicht zu). .

Java, 172 199 235 Bytes

Golf gespielt:

import java.awt.*;interface D{static void main(String[]z){new javax.swing.JDialog(){{setSize(9,99);setVisible(1>0);add(new Button());a();}void a(){for(Point p;;p=MouseInfo.getPointerInfo().getLocation(),setLocation(p.x-9,p.y-70));}};}}

Ungolfed:

import java.awt.*;
interface D{
    static void main(String[]z){
        new javax.swing.JDialog(){
            {
                setSize(9,99);
                setVisible(1>0);
                add(new Button());
                a();
            }
            void a(){

                for(;;) {
                    Point p = MouseInfo.getPointerInfo().getLocation();
                    setLocation(p.x-9,p.y-70);
                }
            }
        };

    }
}

Erläuterung: Bei der Deklaration eines neuen JDialogs verwende ich die doppelte geschweifte Klammer. Dies sparte Bytes, indem die Erweiterung von JDialog ausgeschlossen wurde (so dass ich Bytes ohne publicfrom speichern kann main). In der anonymen Unterklasse von JDialog mache ich es sichtbar (mithilfe von 1>0anstelle von true) und rufe auf a(), was notwendig ist, da der Initalizer einen Fehler bei der Kompilierung aufweist, wenn die Schleife normal darin platziert war. Ich entschied mich für die Verwendung von MouseInfo anstelle des gesamten überschüssigen Codes für das Hinzufügen eines Maus-Listeners.

Bearbeiten: Musste die Anzahl um 27 erhöhen, um hinzuzufügen add(new java.awt.Button());. Ich dachte, JDialogs hätte aus technischen Gründen einen implizierten Knopf, aber ich scheine mich zu irren.

Bearbeiten 2: Die Mausposition musste hinzugefügt setSizeund verschoben werden, damit die Schaltfläche angeklickt werden kann.

Modified Processing Js 102 108 Bytes

draw=function(){background(0);rect(mouseX,mouseY,9,9);rect(mouseX,mouseY,4,4);if(mouseIsPressed){fill(9);}};

Probieren Sie es online! Habe gerade meinen Link aktualisiert!

Es wird nur ein Rechteck gezeichnet, das Ihrer Maus folgt, und ein kleineres Rechteck, auf das Sie klicken, wird rot. Es funktioniert, ist aber nicht erstaunlich. Diese Version ist sehr streng auf Klammern und das alles :(

Clojure, 525 Bytes

(ns d(:require[quil.core :as q][quil.middleware :as m]))(def w 500)(def h 200)(def t 30)(def n 200)(def m 100)(q/defsketch d :size[999 999]:setup(fn[](q/stroke 0 0 0)(q/text-font(q/create-font""(* t 1.3))){:x 0 :y 0}):draw(fn[{x :x y :y}](let[r q/rect f q/fill o(- x(/ w 2))p(- y (/ h 2))](q/background 99 99 99)(f 0 0 255)(r o p w h)(f 200 200 200)(r o(+ p t)w(- h t))(f 255 0 0)(r(-(+ o w)t)p t t)(f 255 255 255)(q/text"X"(- (+ o w) t)(+ p t))(r(- x(/ n 2))(- y (/ m 2))n m))):mouse-moved(fn[_ e]e):middleware[m/fun-mode])

Erstellt keinen echten Windows-Dialog. Stattdessen wird eine gefälschte Schaltfläche erstellt und in der Mitte eine Dummy-Schaltfläche (nicht funktionsfähig) erstellt.

Dies wurde vom OP in den Kommentaren erlaubt.

Verwendet die Quil- Bibliothek.

(ns bits.golf.following-dialog
  (:require [quil.core :as q]
            [quil.middleware :as m]))

(def width 500)
(def height 200)

(def top-bar-height 30)

(def b-width 200)
(def b-height 100)

(defn -main []
  (q/defsketch d
    :size [999 999]
    :setup (fn []
             ; Set the border color
             (q/stroke 0 0 0)

             ; Set the font size
             (q/text-font (q/create-font "" (* top-bar-height 1.3)))

             ; The initial state
             {:x 0 :y 0})

    :draw (fn [{x :x y :y}]
            (let [r q/rect ; Shortcut functions for brevity
                  f q/fill

                  ; The top-left coordinates of the window
                  window-x  (- x (/ width 2))
                  window-y (- y (/ height 2))]

              ; Wipe the previous screen
              (q/background 99 99 99)

              ; Blue top bar
              (f 0 0 255)
              (r window-x
                 window-y
                 width height)

              ; Grey window background
              (f 200 200 200)
              (r window-x
                 (+ window-y top-bar-height)
                 width (- height top-bar-height))

              ; Red top right "button"
              (f 255 0 0)
              (r (- (+ window-x width)
                    top-bar-height)
                 window-y
                 top-bar-height top-bar-height)

              ; The X
              (f 255 255 255)
              (q/text "X" (- (+ window-x width) top-bar-height)
                          (+ window-y top-bar-height))

              ; The main "button"
              (r (- x (/ b-width 2))
                 (- y (/ b-height 2))
                 b-width
                 b-height)))

    ; When the mouse is moved, set the current state to the event object, which
    ;  conveniently has :x and :y properties
    :mouse-moved (fn [_ e] e)

    ; Needed for ease of state management. May try to factor out.
    :middleware [m/fun-mode]))

Mops / Slim + CSS / SCSS / WENIGER / Stylus + ES6 Javascript (98 Bytes)

Probieren Sie es online!

Mops (10 UTF-8 Bytes)

button#a X

Eingabestift (18 UTF-8 Bytes)

#a{position:fixed}

JS (70 UTF-8 Bytes)

onmousemove=e=>{with(a.style){top=e.clientY+'px';left=e.clientX+'px'}}

Decompiled, Ungolfed und erklärtes Snippet:

document.addEventListener('mousemove', function(e) {
  // Get element with an id of "id"
  var el = document.getElementById("id");
  // Set the vertical position
  el.style.top = e.clientY + 'px';
  // Set the horizontal position
  el.style.left = e.clientX + 'px';
})

/* Get element with an id of "id" */

#id {
  /* Position it relative to the viewport*/
  position: fixed;
}

<!-- A basic HTML button with an ID of "id" -->
<button id='id'>
  X
</button>

Mathematica 226 Bytes

Die Mausposition relativ zum Bildschirm wird vom Frontend nachverfolgt, und die Fensterposition des Dialognotizbuchs wird bei jeder Mausbewegung verschoben. Ziemlich einfach, aber die Befehle sind in Bezug auf Buchstaben sehr lang, wie es bei Mathematica häufig der Fall ist. Klicken Sie auf OK, um den Dialog zu schließen.

{s,d,w}={SetOptions,Dynamic,WindowMargins->m};With[{p=d@MousePosition["ScreenAbsolute"]},
m=d@{{p[[1]]-50,0},{0,p[[2]]-35}}];s[$FrontEndSession,FrontEndEventActions->{"MouseMoved":>s[a,w]}];a=CreateDialog[{DefaultButton[]},w];

PS Wenn Sie mit dem Testen fertig sind, führen Sie dies aus, um die Front-End-Option zu entfernen.

SetOptions[$FrontEndSession,FrontEndEventActions->None]

Javascript (ES6) + HTML + CSS, 139 Byte

HTML:

<d id=d><button>X

CSS:

d{background:red;padding:9px;position:absolute

Javascript:

onmousemove=e=>{with(d.style){top=e.clientY-20+'px';left=e.clientX-20+'px'}}

Da Sie Alert-Dialoge nicht positionieren können, habe ich meinen benutzerdefinierten, extravaganten Dialog in HTML erstellt. Das Javascript registriert eine Ereignisbehandlungsroutine für das Fensterobjekt und setzt die Position auf die Koordinaten des Ereignisses.

Versuchen Sie es online: https://jsfiddle.net/1yohswje/