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