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

Re: [fpc-pascal] Boolean case statement

2006-12-05 Thread Steve Williams
Terry Kemp wrote: 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.LeakT

Re: [fpc-pascal] Boolean case statement

2006-12-05 Thread Daniƫl Mantione
Op Wed, 6 Dec 2006, schreef 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 T

Re: [fpc-pascal] Boolean case statement

2006-12-05 Thread Vincent Snijders
Terry Kemp schreef: 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.Lea

[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; E