Solved

How to declare mouse-events in a component-unit

Posted on 2007-04-04
2
185 Views
Last Modified: 2010-04-05
Dear Experts,

I am working on a own component.
How do you declare the MouseDown,
MouseUp and MouseMove events in
a component-unit. Can someone show
me how to do that?

Peter
0
Comment
Question by:peterkiers
2 Comments
 
LVL 10

Accepted Solution

by:
dinilud earned 500 total points
ID: 18855736
If you derivied your component from TCustomPanel, just publish your Mouse events.

eg:

type
  TCustomPanel1 = class(TCustomPanel)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    property OnMouseDown;
    property OnMouseUp;
    property OnMouseMove;

    { Published declarations }

  end;
0
 
LVL 1

Author Comment

by:peterkiers
ID: 18856550
Thanks

Peter Kiers
0

Featured Post

What Is Threat Intelligence?

Threat intelligence is often discussed, but rarely understood. Starting with a precise definition, along with clear business goals, is essential.

Join & Write a Comment

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…
This tutorial demonstrates a quick way of adding group price to multiple Magento products.

759 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

20 Experts available now in Live!

Get 1:1 Help Now