2010/4/7 Kjow <antispamm...@gmail.com>: > Error: Incompatible types: got "Empty Set" expected "TMouseButton"
Whops, I've mistyped, it works!
But how to read the values from a function?
e.g.
function ButtonPress(Button: TMouseButtons): string;
begin
case Button of
...: Result:= 'you pressed' ;
end;
end;
regards,
Kjow
--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
