[Lazarus] Fw: Re: One last ask for help

Antonio Fortuny a.fortuny at sitasoftware.lu
Thu Mar 21 16:41:16 CET 2013


> 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
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>





More information about the Lazarus mailing list