Am 21.03.2013 16:41, schrieb Antonio Fortuny:
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
Ah, ok :)
Regards,
Sven
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus