comboBox OnMouseMove-Eigenschaft zufügen

[Neutral General]

Komponente -> Neue Komponente
Ableiten von: TComboBox
NeuerName: *beliebig*
-> Ok

QT:

Delphi-Quellcode:

unit MouseMoveComboBox;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TMouseMoveComboBox = class(TComboBox)
  private
    { Private-Deklarationen }
  protected
    { Protected-Deklarationen }
  public
    { Public-Deklarationen }
  published
    { Published-Deklarationen }
    property OnMouseMove;
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Standard', [TMouseMoveComboBox]);
end;

end.

Komponente -> Komponente installieren -> Unit auswählen -> OK -> kompilieren/installieren -> benutzen

Gruß
Neutral General