Or you can put it into another unit, and then when you use it prefix it with the unit name, which in effect becomes a namespace.
Myles. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Neven MacEwan Sent: Thursday, 10 May 2007 11:37 To: NZ Borland Developers Group - Delphi List Subject: Re: [DUG] Why use a set when a string will work OK (and less code)? Nick Thats why you use a lower case prefix ie tmsActive, tmsPending, ... verssu tllNormal, tllError, tllEnded... HTH Neven > Nice thats even shorter :-) > So following on from this, what happens when you want to do something > like this > > TMyStatus = (Active, Pending, Ended, Paused, Deleted, Suspended); > TLogLevel = (Normal,Error,Ended); > > This will cause an error as Ended appears twice. > How you can you get around this? > > > > > Paul Heinz wrote: >> Sean Cross wrote: >> >> >>> TMyStatus = (Active, Pending, Ended, Paused, Deleted, Suspended); >>> StatusMeanings = array[TMyStatus] of string = ('Active', 'Pending', >>> 'Ended', 'Paused', 'Deleted', 'Suspended'); ... >>> ShowMessage(StatusMeanings[Status]); >>> >> >> Also, Delphi can do this for you using RTTI - this is how enum >> properties work inside .dfms i.e. translating to/from string constants. >> >> Uses >> TypInfo; >> >> ShowMessage(GetEnumName(TypeInfo(TMyStatus), Integer(Status)); >> >> TTFN, >> Paul. >> >> _______________________________________________ >> NZ Borland Developers Group - Delphi mailing list >> Post: delphi@delphi.org.nz >> Admin: http://delphi.org.nz/mailman/listinfo/delphi >> Unsubscribe: send an email to [EMAIL PROTECTED] with >> Subject: unsubscribe >> >> > _______________________________________________ > NZ Borland Developers Group - Delphi mailing list > Post: delphi@delphi.org.nz > Admin: http://delphi.org.nz/mailman/listinfo/delphi > Unsubscribe: send an email to [EMAIL PROTECTED] with > Subject: unsubscribe > > _______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: delphi@delphi.org.nz Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to [EMAIL PROTECTED] with Subject: unsubscribe Attention: This communication is confidential and may be legally privileged. If you are not the intended recipient, please do not use, disclose, copy or distribute it, other than to return it to us with your confirmation that it has been deleted from your system. _______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: delphi@delphi.org.nz Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to [EMAIL PROTECTED] with Subject: unsubscribe
