Ordinaltyp für Werkzeug

[glkgereon]

du könntest byte nehmen und dir konstanten machen

Delphi-Quellcode:

const
  Zeiger = 0;
  Schere = 1;
  Stift = 2;
//etc...
var  
  Werkzeug:byte;