Unit FindWin1 |
Renamed from Finwin.pas 6/8/1998 Paul Rice to avoid conflict with other versions.} { Date: 01.03.97 Time: 17:30:40 } { Copyright (c)1996-1997 } { © by Dr.Plass TFindWin2.1 } { } { for DELPHI 1, Win3.1x } { feel free to contact me: } { Peter.Plass@FH-Zwickau.de } { http://www.fh-zwickau.de/~pp/tm.htm } { } { All Rights Reserved. } { This component can be freely used and distributed in commercial and } { private environments, provided this notice is not modified in any way. } { } { based on Jerome Tremblay's component TWindowsList v1.0 } { --> jerome@infose.com } { } { } { } {***************************************************************************} // // // Methods: // procedure Execute; // function GetWinHandle (Idx : Integer): HWND; // function GetWinParent (Idx : Integer): HWND; // function GetTaskHandle(Idx : Integer): HTask; // function GetWinStyle (Idx : Integer): LongInt; // function GetIconHandle(Idx : Integer): HIcon; // function GetWinExStyl (Idx : Integer): LongInt; // function GetWinExePath(Idx : Integer): String; // function GetWnClasName(Idx : Integer): String; // function GetModuleName(Idx : Integer): String; // function GetParentName(Idx : Integer): String; // // e.g.: whdl := WinList1.GetWinHandle(ListBox1.ItemIndex); // // Properties: // Property WhatDoFind : TFind_ID; // Property WindowList : TStringList; // Property EmptyNames : Boolean; // Property TaskBarSty : Boolean; // Property EnableHook : Boolean; // Property OnChanged : TNotifyEvent; // //
Classes |
Functions |
Types |
Constants |
Variables |
Functions |
Types |
TFind_ID = (id_All,id_VisOnly,id_InvisOnly);
Constants |
Variables |