sorganize(var AArray: Array of integer); overload;
procedure disorganize(var AStr: TStringList); overload;
procedure DrawBitmapShadow(B: TBitmap; ACanvas: TCanvas; X, Y: integer;
ShadowColor: TColor);
procedure BlendIcon(Canvas: TCanvas; const R: TRect;
ImageList: TCustomImageList; ImageIndex: Integer; Opacity: Byte);
procedure DimBitmap(ABitmap: TBitmap; Value: integer);
procedure GrayBitmap(ABitmap: TBitmap; Value: integer; tspColor: TColor);
procedure DrawDownArraw(ACanvas: TCanvas;ARect: TRect; Size: byte; Color: Tcolor);
procedure DrawUpArraw(ACanvas: TCanvas;ARect: TRect; Size: byte; Color: Tcolor);
procedure DrawTraMark(ACanvas: TCanvas; posBegin: TPoint; Size: byte; Color: Tcolor; Up: boolean);
function MouseHook(handle: HWnd; ShowModal: boolean): HHook;
procedure unHookMouseHook(AHook: HHook);
function PopupWindowMouseHook(Code: Integer; wParam: WParam; lParam: LParam): LRESULT; stdcall;
function RWStrFromReg(const key: string; name, value: string; Write: boolean): string;
//procedure ReadFromReg(const key: string; Names: array of variant; values: var array of variant);
procedure msHookshow(AControl: TWinControl; modal: boolean);
procedure msHookHide(handle: Hwnd);
procedure msHookDropDown(Sender, DropDownControl: TWinControl);
procedure DoBusy(Busy: Boolean);
//Add on 2003.8.19
procedure SavePropertyToStream(Stream: TStream; Instance: TPersistent; PropName: string);
procedure LoadPropertyFromStream(Stream: TStream; Instance: TPersistent);
function digitToChinese(value: Real; EndAtYuan: boolean): string;
function dupString(S: String; count: integer): string;
procedure InOutStr(var S: string; char: String);
procedure StringsSetCount(var sList: TStringList; NewCount: integer);
procedure Circle(cvs: TCanvas; Radius: integer; ptCenter: Tpoint);
procedure FillGradient(const DC: HDC; const ARect: TRect; StartColor,
EndColor: TColorRef; const Direction: TGradDir);
Function AvailableUrl(url:string):boolean;
Function InterNetConnected: boolean;
function Matchstrings(Source, pattern: string): Boolean; //字符匹配
function GetToken(const S: string; index: Integer; bTrail: Boolean = False; Delimiters: TSysCharSet = DEFAULT_DELIMITERS): string;
function GetLocalIP: String; //取的 本机IP
function GetBroadCastIp: string;
function GetTaskBarHeight: integer; //取的任务栏的高度;
function GetTaskBarWnd: HW
ND;
function GetWindowText(HWnd: HWnd;GetPassWord: Boolean=False): string;
//取得文本且可以取得密码
function IsObjectActive(className : string):boolean;
procedure CopyBmpToClp(imList: TImageList; index: integer);
function TempPath: string;
function MakeTempFilename(pf: string; cn: integer; Doctype: string; NewPath: string = ''): string;
function safeTmpFile(s: string; DocType: string; AllowExist: boolean = true): string;
function IsFileInUse(fName : string ) : boolean;
Function Cjt_AddtoFile(SourceFile,TargetFile:string): Boolean;
Function Cjt_DetachFromFile(SourceFile, TargetFile :string): Boolean;
function GetVersion(FileName: string): string;
procedure FillTubeGradientRect(DC: HDC; const ARect: TRect; AColor1, AColor2: TColor;
AHorizontal: Boolean);
function DeleteCRLF(s: