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

Reply via email to