On Sat 20 Feb 2010, Jürgen Hestermann wrote: > > > y := case Other of > > bla : 'hello'; > > foo : 'bye'; > > baz : 'adius'; > > end; > > What do you gain with this? > Doesn't look much different to > > case Other of > bla : y := 'hello'; > foo : y := 'bye'; > baz : y := 'adius'; > end;
or this... type foo_type = (bla, foo, baz); var foo_names : array [foo_type] of string = ('hello', 'bye', 'adius'); y := foo_names[other]; _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal