2010/4/7 Kjow <[email protected]>:
>> As result you don't need mbNone. Just use [] to indicate that no button is
>> pressed.

> 2010/4/7 Martin <[email protected]>:
>> Create a set

Other question... how to pass/read [] "vaule" to/in a function?

e.g.

function ButtonPress(Button: TMouseButton): string;
begin
  case Button of
   []: Result:='Nothing Pressed'; //e.g.
   mbLeft: Result:='mbLeft';
   mbRight: Result:='mbRight';
   mbMiddle: Result:='mbMiddle';
  end;
end;

and somewhere:

showmessage(ButtonPress([])); // [] -> e.g.

Thanks,
Kjow

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to