| Class TBiancoRect (unit T_BiancoRect) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
PROCEDURE CAPTUREIMAGE(IMAGE1:TIMAGE);
procedure Delay(msecs:WORD);
PROCEDURE DESTROYRECT;
FUNCTION EXECUTE:BOOLEAN;SET THE FROM* AND TO* PROPERTY
FUNCTION MOVECONTROL(C:TCONTROL;X,Y:INTEGER):BOOLEAN;
PROCEDURE MOVERECT(_LEFT,_TOP:INTEGER);
PROCEDURE SHOWRECT(_LEFT,_TOP:INTEGER);THIS IS 3 METHODS TO SHOW, MOVE AND HIDE THE MANUAL RECT
PROCEDURE EXECUTE_DIRECT;THE OTHER RECT CANNOT BE VISIBLE
PROCEDURE EXECUTE_XY;
PROCEDURE EXECUTE_YX;
PROCEDURE SET_ERRORE(VALUE:INTEGER);
PROCEDURE SET_H(VALUE:INTEGER);
PROCEDURE SET_SCREEN(VALUE:TSCREENRIFERIMENT);
PROCEDURE SET_W(VALUE:INTEGER);SETTING THE PROPERTIES.
| Properties |
property AutomationStyle : TAutomationType
property FromBottom : INTEGER
property FromLeft : INTEGER
property FromRight : INTEGER
property FromTop : INTEGER
property Interval : WORD
property LastError : INTEGER
property ManualRectHeight : INTEGER
property ManualRectWidth : INTEGER
property NumberOfRect : INTEGER
property ScreenRiferiment : TScreenRiferiment
property ShowTrail : BOOLEAN
property ToBottom : INTEGER
property ToLeft : INTEGER
property ToRight : INTEGER
property ToTop : INTEGER| Events |
| Variables |
Auto : TAutomationType;
DELTA : ARRAY[1..4] OF DOUBLE;
ERRORE : INTEGER;
FT : ARRAY[1..2,1..4] OF INTEGER;
INTERV : WORD;
LASTLEFT : INTEGER;
LASTTOP : INTEGER;
NUM_T : INTEGER;
POSIT : ARRAY[1..4] OF DOUBLE;
REC : TRECT;
Rife : TScreenRiferiment;
ScreenDC : HDC;
TRAIL : BOOLEAN;
VIS : BOOLEAN;
_H : INTEGER;
_W : INTEGER;| Constructors |
constructor Create(AOwner: TComponent);*****************************************************************************
| Functions |
PROCEDURE CAPTUREIMAGE(IMAGE1:TIMAGE);BOOL BitBlt( HDC hdcDest, // handle of destination device context int nXDest, // x-coordinate of destination rectangle's upper-left corner int nYDest, // x-coordinate of destination rectangle's upper-left corner int nWidth, // width of destination rectangle int nHeight, // height of destination rectangle HDC hdcSrc, // handle of source device context int nXSrc, // x-coordinate of source rectangle's upper-left corner int nYSrc, // y-coordinate of source rectangle's upper-left corner DWORD dwRop // raster operation code );
procedure Delay(msecs:WORD);destructor Destroy; virtual;
PROCEDURE DESTROYRECT;CHANGE THE POSITION
FUNCTION EXECUTE:BOOLEAN;DELAY MSECS MILLISECONDS THE METHOD FOR THE AUTOMATIC RECT
SET THE FROM* AND TO* PROPERTY
FUNCTION MOVECONTROL(C:TCONTROL;X,Y:INTEGER):BOOLEAN;HERE IT IS THE METHOD FOR THE AUTOMATIC RECT
PROCEDURE MOVERECT(_LEFT,_TOP:INTEGER);Alwais TForm
PROCEDURE SHOWRECT(_LEFT,_TOP:INTEGER);3 METHODS FOR THE MANUAL RECT
THIS IS 3 METHODS TO SHOW, MOVE AND HIDE THE MANUAL RECT
PROCEDURE EXECUTE_DIRECT;DELTAXY TRANSLATION AND CURRENT RECT INTERNAL PROCEDURES
THE OTHER RECT CANNOT BE VISIBLE
PROCEDURE EXECUTE_XY;DELETE THE RECT
PROCEDURE EXECUTE_YX;DOPPIO DELTA PERCHE' META' LOOP
PROCEDURE SET_ERRORE(VALUE:INTEGER);IT DOESN'T DO ANITHING...
...
PROCEDURE SET_H(VALUE:INTEGER);SET THE WIDTH
PROCEDURE SET_SCREEN(VALUE:TSCREENRIFERIMENT);NOTHING TO DO... CODE DESCRIPTION 0 ALL RIGHT. 1 THE MANUAL RECT IS ALREDY VISIBLE. 2 THE MANUAL RECT IS NOT VISIBLE. 3 YOU CAN NOT CHANGE THE SCREEN RIFERIMENT WHILE MANUAL RECT IS VISIBLE
PROCEDURE SET_W(VALUE:INTEGER);SET WIDTH AND HEIGHT
SETTING THE PROPERTIES...
| Properties |
property AutomationStyle : TAutomationType
property FromBottom : INTEGER
property FromLeft : INTEGER
property FromRight : INTEGER
property FromTop : INTEGERPROPERTY PER AUTOMATIC RECT
property Interval : WORD
property LastError : INTEGERALWAIS ACTIVE
property ManualRectHeight : INTEGER
property ManualRectWidth : INTEGERPROPERTY PER MANUAL RECT
property NumberOfRect : INTEGER
property ScreenRiferiment : TScreenRiferiment
property ShowTrail : BOOLEAN
property ToBottom : INTEGER
property ToLeft : INTEGER
property ToRight : INTEGER
property ToTop : INTEGER| Events |
| Variables |
Auto : TAutomationType;
DELTA : ARRAY[1..4] OF DOUBLE;NUMERO DI RECT.
ERRORE : INTEGER;TOP,LEFT,BOTTOM,RIGHT DI PARTENZA E ARRIVO
FT : ARRAY[1..2,1..4] OF INTEGER;
INTERV : WORD;
LASTLEFT : INTEGER;
LASTTOP : INTEGER;
NUM_T : INTEGER;VEDI LA SCIA
POSIT : ARRAY[1..4] OF DOUBLE;
REC : TRECT;
Rife : TScreenRiferiment;
ScreenDC : HDC;
TRAIL : BOOLEAN;
VIS : BOOLEAN;WIDTH,HEIGHT OF THE RECT
_H : INTEGER;
_W : INTEGER;