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
