hallo, setzt mal "byval x as byte..." in die declare.
mfg pebisoft