2010/4/7 Martin <laza...@mfriebe.de>: > Case will not work. > > but > mbleft, or mbLeft + any other button > if mbLeft in Buttons then xxx; > > for only mbLeft, no other button: > if Buttons = [mbLeft] then xxx; > > to add / remove ... > Buttons := Buttons + mbLeft; > Include(Buttons, mbLeft); > Buttons := Buttons - mbLeft; > Exclude(Buttons, mbLeft);
Thank you! Now I understood that for 'nothing' I need to do: if Button=[] then Result:='nothing'; And if I want a combination I need to provide any case e.g. if Buttons = [mbLeft,mbRight] then xxx Thank you very much to all, you are great :) Best Regards, Kjow -- _______________________________________________ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus