home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 26
/
CD_ASCQ_26_1295.iso
/
vrac
/
psslider.zip
/
PSCCTL.INT
< prev
next >
Wrap
Text File
|
1995-06-06
|
1KB
|
34 lines
unit PSCCtl;
{This is the source of the abstract PSCustomControl component of the Perseus VCP.
All components of Perseus are descendants of this component. It simply implements
a public event which is called then a property has changed. If you purchase at
least 2 copies of this component you'll receive it with your registered version!
Copyright ⌐ 1995: Sebastian Modersohn
Softwaredevelopment
Heinestrasse 20
D 15370 Petershagen
Phone: ++49 33439 7462
CIS ID: 100340,1474
Written by: Sebastian Modersohn
The source is nearly undocumented, so if you have questions to details, just
contact us via CompuServe and we'll help you (if we can <g>).}
interface
uses WinTypes, Messages, Classes, Controls;
type
TPSCustomControl = class(TCustomControl)
private
EOnChange: TNotifyEvent;
protected
procedure Change; dynamic;
public
property OnStyleChanged: TNotifyEvent read EOnChange write EOnChange;
end;
implementation