Written by Pepijn Smits
TEyes is a native Delphi VCL component that emulates (somewhat) X-Eyes. Finally, this great feature of some Operating Systems is now available for the world's greatest development environment: Delphi!
This version has been updated for Delphi 3.0 and should be distrubited under the name DEL3EYES.ZIP.
When I saw one of those Eyes apps some time ago, I thought: `this has to be available to Delphi Developers too!'. I dug into some math (component building was the easy part, believe me) and this is the result. I must add: Special thanks go to Ferns Paanakker for Helping me with some of the Math involved. When the first version was working correctly I decided to tidy the code up a bit to `Borland' standards (meaning clean code with just enough comments to go by <g>), add a fews docs and a demo app. and release the stuff 'on the net' (where you found it, presumably).
This stuff is freeware, but the usual applies: Use at your own risk. I take no responsability to anything involved in using this Component/Package and All Rights Reserved by the Author. Usage of this component and package means that you agree with these terms.
Files included in the DEL3EYES.ZIP package:
The 16-bits version is no longer included. Download/Look for DELEYES.ZIP for that version.
I Also removed the Demo as using the component is soooooo easy, it's not needed!
Installation instructions:
Some Comments:
The TEyes Component source code is also released, as should be the case with any 'freeware' stuff: one should be able to learn from it. With that in mind I did my best to make the whole quite 'clean'. TEyes itself descends from TCustomEyes (you could for instance make a TOldBlueEyes component that descends from TCustomEyes and has clNavy Pupils!). Also a TEyesEditor is supplied with gives some 'About' information to anyone double-clicking on it at Design-Time.
The code is pretty self-explanatory. Some comments have been added in the code that calculates the pupil position (that's the hard for us Delphi developers but probably basics for a math teacher), the rest should be quite easy to read (and understand) for anyone involved in Component building.
Have fun!
To finish, some interesting links:
Pepijn Smits - Athena Software - Van Ostadestraat 494 - 1074 XE Amsterdam - The Netherlands
Phone ++31.20.470.35.35 - Fax ++31.20.470.05.67 - E-Mail pepijn@compuserve.com - CompuServe ID 74750,733
Athena Software: Delphi Maatwerk, Consultancy en Training..