Hello Jeremy,
JN> Where were you trying to assign the OnIdle event in main form originally?
JN> FormCreate?
Yes.
Unfortunately I still cannot get the thing to compile I think I did what you
suggest here in DPR:
program back4winXP;
uses
Forms,
dialogs,
mainunit in 'mainunit.pas' {Mainform},
b4winabt in 'b4winabt.pas' {b4winForm},
regunit in 'regunit.pas' {RegForm},
Password in 'password.pas' {PasswordDlg},
mb in 'mb.pas',
SortGrid in 'SortGrid.pas',
Updater in '..\..\mylib\Updater.pas',
VCLZip in '..\..\mylib\ZIP\VCLzip\VCLZip.pas',
VCLUnZip in '..\..\mylib\ZIP\VCLzip\VCLUnZip.pas',
Sshare in '..\..\Lib\Additional\Sshare.pas';
type
TIdleHandler = class(TObject)
procedure IdleHandler(Sender: TObject; var Done: Boolean);
end;
{$R *.RES}
procedure TIdleHandler.IdleHandler(Sender: TObject; var Done: Boolean);
begin
if mainform.ReadyForStealth then Mainform.StealthNow('');
mainform.ReadyForStealth := false;
end;
var lIdleHandler: TIdleHandler;
begin
Application.Initialize;
Application.Title := 'Back4WinXP';
Application.HelpFile := 'back4winxp.hlp';
Application.ShowMainForm := False;
Application.CreateForm(TMainform, Mainform);
lIdleHandler := TIdleHandler.Create;
Application.OnIdle := lIdleHandler;
Application.run;
end.
--
Regards,
Alistair+
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
