| Class TExpNoteForm (unit expnoteu) |
TTrayIconForm
| Constructors |
| Functions |
procedure BtnAboutClick(Sender: TObject);
procedure BtnFindNoteClick(Sender: TObject);
procedure BtnHelpClick(Sender: TObject);
procedure BtnPruneClick(Sender: TObject);
procedure FindDialog1Find(Sender: TObject);
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure Open1Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure wmEndSession(VAR Msg: TWMEndSession);
procedure wmQueryEndSession(VAR Msg: TWMQueryEndSession);
procedure wmSyscommand(VAR Msg: TWMSysCommand);| Properties |
| Events |
| Variables |
About1 : TMenuItem;
BtnAbout : TSpeedButton;
BtnFind : TSpeedButton;
BtnHelp : TSpeedButton;
BtnPrune : TSpeedButton;
FindDialog1 : TFindDialog;
Image1 : TImage;
Open1 : TMenuItem;
PopupMenu1 : TPopupMenu;
Timer1 : TTimer;
fFoundItem : String;
fFoundNote : String;
fNoteToFind : String;
holdMap : THandle;
ReallyClose : Boolean;| Constructors |
| Functions |
procedure BtnAboutClick(Sender: TObject);If the key is non-empty and doesn't represent an existing file or directory, it's NOT OK!
procedure BtnFindNoteClick(Sender: TObject);
procedure BtnHelpClick(Sender: TObject);
procedure BtnPruneClick(Sender: TObject);
procedure FindDialog1Find(Sender: TObject);
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);Allow shutdown if Windows is shutting down
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);By observation, this bit indicates the state of the Explorer View Option "Display the full MS-DOS path..."
procedure FormShow(Sender: TObject);
procedure Open1Click(Sender: TObject);left edge
procedure Timer1Timer(Sender: TObject);
procedure wmEndSession(VAR Msg: TWMEndSession);Register so we get notified of ACTUAL end-session
procedure wmQueryEndSession(VAR Msg: TWMQueryEndSession);Don't terminate on close; just minimize
procedure wmSyscommand(VAR Msg: TWMSysCommand);| Properties |
| Events |
| Variables |
About1 : TMenuItem;
BtnAbout : TSpeedButton;
BtnFind : TSpeedButton;
BtnHelp : TSpeedButton;
BtnPrune : TSpeedButton;
FindDialog1 : TFindDialog;
Image1 : TImage;
Open1 : TMenuItem;
PopupMenu1 : TPopupMenu;
Timer1 : TTimer;
fFoundItem : String;
fFoundNote : String;
fNoteToFind : String;
holdMap : THandle;Private declarations
ReallyClose : Boolean;