[fpc-pascal] Boolean case statement

2006-12-05 Thread Terry Kemp
Hi All how do you do a case statement on a record of booleans e.g... Type EngModeRec = Record ManualOp: Boolean; LeakTest: Boolean; DrainFlush: Boolean; end; var EngMode: EngModeRec; I want to have... Case True of EngMode.ManualOp: ManualOpRun; EngMode.LeakTest: LeakTestRun;

Re: [fpc-pascal] Boolean case statement

2006-12-05 Thread Terry Kemp
On Tue, 2006-12-05 at 22:44 +0100, Vincent Snijders wrote: Terry Kemp schreef: Hi All how do you do a case statement on a record of booleans e.g... You cannot use it like that. You would have to use an nested if then statement like: if EngMode.ManualOp then ManualRun else if