本人最近在学新的C++Bulder开发工具XE8/10，以前只用过BCB6，不会delphi，都是出自一家公司，还是有很多相似的地方，CB用多了，delphi也能看懂一点。在FireMonkey群里看到2位网友上传的界面Demo,下载学习了一下，发现FMX做的界面效果不错，在此特别感谢两位提供源码的网友，不过都是用delphi写的，学习后就仿照着尝试用CB重写了一下，由于语法有些不同，中间遇到一些问题，查阅相关资料后，终于仿制完成。部分delphi语句没有删除，只注释掉了，以供对比CB参考。网上CB的FireMonkey资料太少了，分享此源码给CB新手参考（高手就不用看啦，不过也欢迎指教）,希望大家多多分享，壮大CB开发的队伍。