{***************************************************************************}
{  Date: 19.01.97                                            Time: 17:30:40 }
{  Copyright (c)1996-1997                                                   }
{  ) by Dr.Plass                                               TFindProc1.0 }
{                                                                           }
{                                              for DELPHI 2, Win95 (Not NT!)}
{  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.   }
{                                                                           }
{  used:                                                                    }
{  ToolHelp32 v1.00  Copyright 1996 by Brad Stowers                         }
{                                                                           }
{***************************************************************************}
//
//
//  Methods:
//
//   procedure GetProcessInfo;
//    function GetP_CountUsage(idx : Integer):DWORD;
//    function GetP_ID(idx : Integer): DWORD;
//    function GetP_defHeap(idx : Integer): DWORD;
//    function GetP_ModuleID(idx : Integer): DWORD;
//    function GetP_CountThreads(idx : Integer): DWORD;
//    function GetP_ParentPID(idx : Integer): DWORD;
//    function GetP_Priority(idx : Integer): LongInt;
//    function GetP_dwFlags(idx : Integer): DWORD;
//    function GetP_ExePath(idx : Integer): String;

//  procedure GetModuleInfo(ProcID : DWORD);
//    function GetM_ModuleID(idx : Integer):DWORD;
//    function GetM_ProcessID(idx : Integer):DWORD;
//    function GetM_GlblcntUsage(idx : Integer):DWORD;
//    function GetM_ProccntUsage(idx : Integer):DWORD;
//    function GetM_modBaseSize(idx : Integer):DWORD;
//    function GetM_hModule(idx : Integer):HMODULE;
//    function GetM_szExePath(idx : Integer):string;

//  e.g.: whdl := ProcList1.GetP_CountUsage(ListBox1.ItemIndex);
//
//  Properties:
//
//  ModuleList : TStringList ;
//  ProcessList: TStringList ;
//