Hello Chris,
It passed the first compile error but the second compile error:
'Constant expression expected'
The sender(s) are tmenuitems thus the following
case longword(Sender) of
EraseFiles1: //'Constant expression expected'
WriteInteger('Options', 'ClrDisk', 0);
FormatDisk1:
WriteInteger('Options', 'ClrDisk', 1);
end;
erasefiles1 is the sender of tmenuitem
????
It is a different way of doing it, but I thought if I could use the sender of
all the various checks and menu clicks it would save a lot of coding and make it
a lot easier to read.
The other way would be to allocate each item a tag, but then the code is nowhere
as easy to read.
Thanks,
Al+
---------------------------------------------------------------------------
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/
