Out of curiosity: why do you use "Ord"? You can achieve the same by just
using the chars:
=== code begin ===
case Key of
'>',
#03: begin
//...
end;
'<',
#02: begin
//...
end;
else begin
//...
end;
end;
=== code end ===
Regards,
Sven
Hum, you are right. Only history. I herited if this program (and others)
and I haven't yet finish to restructure it as it suffers of continous
development
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus