Hi!
Wie wäre es mit folgenden konstrukt?
Delphi-Quellcode:
Type
TMyWordID = (mw_hi_hallo, mw_irgendwas, mw_irgendwas2);
TSMyWordIDs = Set of TMyWordIDs;
const
cMyWords: array[TMyWordID] of string = ('hi+hallo', 'irgendwas.foo', 'irgendwas2.bar');
...
var WordSet:TSMyWordIDs = [mw_hi_hallo, mw_irgendwas];
...
if wm_irgendwas in WordSet then
ShowMessage(cMyWords[wm_irgendwas]);
oder hab ich dich falsch verstanden? ...hier hat man zu den eigentlichen string noch IDs, mit denen man rechnen kann, dass kann in vielen fällen sehr hilfreich sein
// edit: string war nicht zu
// edit2: war unlogisch
mâxîmôv.
{KDT}