I'm trying to use the Switch / Case function to replace a series of "IF Then" in my code. No success yet..
The condition where price need to be between two values is causing me problem
Case <= Button_3_High and >= Button_3_Low : Button_3 = true;
Code: Select all
If vClickBarNbr = barnumber + maxbarsback then begin
HighestPrice = Getappinfo(aiHighestDispValue);
Lowestprice = Getappinfo(aiLowestDispValue);
UpperPart = HighestPrice - (.1 * (HighestPrice-LowestPrice));
LowerPart = HighestPrice - (.90 * (HighestPrice-LowestPrice));
Button_3_High = highestprice - ((HighestPrice-Lowestprice) *.45);
Button_3_Low = HighestPrice - ((HighestPrice-lowestprice) *.55);
Switch (vclickprice) begin
Case >= upperpart : Button_1 = true ;
Case <= Lowerpart : Button_5 = true;
Case <= Button_3_High and >= Button_3_Low : Button_3 = true;
end;
end;