せっかくVCLにTPaserがあるんだからそれを継承して作れば。