Delphi-PRAXiS - DXButton

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)

- - DXButton (https://www.delphipraxis.net/75875-dxbutton.html)

Hi,

Ich habe jetzt mal einen TDXButton gebastelt. Das ist spezieller Button den man unter DelphiX verwenden kann/muss.
Er ist abgeleitet von TImageSprite.

Features:

:arrow: Caption
:arrow: Font
:arrow: DownImage (Das Image das angezeigt wird wenn der Button gedrückt ist)
:arrow: OnClick
:arrow: OnMouseDown

Wie funktioniert der DXButton?:

Delphi-Quellcode:

uses DXButton;

Delphi-Quellcode:

var ADXButton: TDXButton;

Delphi-Quellcode:

			ADXButton := TDXButton.Create(ASpriteEngine.Engine,ADXImageList.Items[x]);

ADXButton.DownImage := ADXImageList.Items[y];

Delphi-Quellcode:

			ADXButton.OnClick := ATNotifyEvent;

ADXButton.OnMouseMove := ATMouseMoveEvent;

Credits:
Ich möchte mich an dieser Stelle bei mimi und igel457 bedanken, ohne die dieser Button niemals zustande gekommen wäre :)

Der Button ist natürlich erst in Entwicklung, d.h. Vorschläge werden gerne angenommen :)
Naja viel Spaß beim ausprobieren :)

Gruß
Neutral General

Ehm wollte mal nachfragen ob es jemanden gibt der meinen Button vielleicht ansatzweise für interessant oder runterladenswert hält und mir mal bisschen Kritik oder Verbesserungsvorschläge an den Kopf werfen kann :mrgreen:

Der Button ist sehr gut :thumb:

Ein Vorschlag vielleicht:

Interessant wäre bei dem Button ein ähnliches Verhalten wie im Windowsbetriebssystem, d.h.
wenn gedrückt und haltenden Mausklick mit Verlassen der Schaltfläche, dass diese dann nicht
mehr gedrückt aussieht und auch nicht das Verhalten onClick() auslöst.

Natürlich muss die Schaltfläche wieder gedrückt aussehen, falls man doch noch wieder auf
diese mit dem Mauszeiger zurückkehrt. :hi: