DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: bluewind23
今日帖子: 0
在线用户: 7
导航: 论坛 -> 发布控件 斑竹:liumazi,ruralboy  
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:33:51
标题:
原创天文日历控件,VCL+FMX。 浏览:6402
加入我的收藏
楼主: 原创天文日历控件,VCL+FMX。



看图片可能看不出什么,按装或者试一下demo就清楚,这里下载,


https://1drv.ms/u/s!AquAKnHLvxndg0S17tJJbl7SOLpz

http://pan.baidu.com/s/1kVfww6b



其他部分的帖子

http://bbs.2ccc.com/topic.asp?topicid=530941



VCL改成FMX非常不容易,FMX很多坑,特别是安卓下面的FMX,简直就是深渊。



因为是天文运算算出来的,用的都是天文数字,所以比较慢,现在用了1/3的
代码做结构优化,所以在模拟器运行也没问题,在真机效果更好。
此帖子包含附件:
JPEG 图像
大小:154.5K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:34:20
1楼: 在安卓模拟器上运行
此帖子包含附件:
JPEG 图像
大小:143.9K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:35:06
2楼: VCL版本,
此帖子包含附件:
JPEG 图像
大小:214.0K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:35:28
3楼: VCL版本
此帖子包含附件:
JPEG 图像
大小:176.6K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:36:15
4楼: VCL版本
此帖子包含附件:
JPEG 图像
大小:223.2K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:36:32
5楼: FMX版本
此帖子包含附件:
JPEG 图像
大小:143.9K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:36:52
6楼: FMX版本
此帖子包含附件:
JPEG 图像
大小:143.8K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/6/27 16:37:41
7楼: 楼主,来个 macosx 和 ios 版本。
----------------------------------------------
(C)(P)Flying Wang
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 16:38:00
7楼: 月食图, VCL和FMX功能一样的,虽然程序完全不同
此帖子包含附件:
JPEG 图像
大小:211.0K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 hujiacheng ( 旺财) ★☆☆☆☆ -
普通会员
2017/6/27 17:34:04
8楼: 微软的速度快 下完了 。
D7  10.1 无码。按此在新窗口浏览图片 可是我只有10.2
----------------------------------------------
免费的FTPhttps://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019>http://delphi-z.ruhttps://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019>http://delphi.icm.edu.pl/ftp/https://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019>http://delphi-z.ruhttps://download-installer.cdn.mozilla.net/pub/firefox/releases/43.0/win64/zh-CN/https://cc.embarcadero.com/Author/575019
作者:
男 vmao (毛小毛) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 19:29:16
9楼: 楼主日历专家
----------------------------------------------
-
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 19:47:57
10楼: 10.2 的
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 20:06:58
11楼: 虽然是本人的个人作品,但绝对是宇宙时空神幻级大作,从天体计算到时辰吉凶,属性数量多的夸张,所以有错在所难免,但不会有很大的错误。
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 20:22:28
12楼: 日历里面有个像八卦的图,它是表示日飞星的,日飞星跟两大节气有关,不是随机乱作出来的。这个日历几乎所有元素,在我的控件都能找到。
此帖子包含附件:
JPEG 图像
大小:236.9K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 epzybook (epzybook) ★☆☆☆☆ -
普通会员
2017/6/27 22:47:19
13楼: 真正做到开源就好了。。。
----------------------------------------------
-
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/27 23:23:55
14楼: 不作功能限制,不作任何收费,还不满足?
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 epzybook (epzybook) ★☆☆☆☆ -
普通会员
2017/6/28 6:23:10
15楼: 回楼主:

有时想改改万年历里面的东西,就不好改了。

万年历的一些算法,一直都有在修正的。
----------------------------------------------
-
作者:
男 s84894567 (不一般的Delphi) ▲▲▲▲▲ -
普通会员
2017/6/28 10:56:29
16楼: 真不错!

另外请问现成的VCL程序转FireMonkey可以用什么工具?
Mida Converter 5.6哪里有下载。
----------------------------------------------
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/6/28 11:04:33
17楼: 有转换工具这么好?我也想要。
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 onechen (onechen) ▲▲▲▲▲ -
普通会员
2017/6/28 16:41:49
18楼: 赞,感谢分享!

可以编译四个平台 Win, macOS, Android, iOS, 再截图,给 Delphi 做一个跨平台展示。
----------------------------------------------
-
作者:
男 lsh341999 (虫子) ★☆☆☆☆ -
普通会员
2017/6/28 17:23:41
19楼: 楼主还在炒股么?
----------------------------------------------
就怕想不到,没有做不到的
作者:
男 zswleo (Wisz) ★☆☆☆☆ -
盒子活跃会员
2017/6/29 13:22:57
20楼: 感谢分享,kinneng (kinneng)赞你一个。
----------------------------------------------
Love computer  love  programming
作者:
男 crystalmoon (crystalmoon) ★☆☆☆☆ -
盒子活跃会员
2017/6/29 13:41:17
21楼: 好,支持,以后可以有副业了,算卦!
----------------------------------------------
-
作者:
男 cnpack (CnPack) ★☆☆☆☆ -
普通会员
2017/6/29 13:51:48
22楼: 楼主做的控件非常好。

搭个车。想了解黄历知识的朋友,可以参考CnPack组件包中的说明:
http://www.cnpack.org/showdetail.php?id=452&lang=zh-cn

CnPack组件包里也有CnCalendar.pas用来计算各种历法概念。
----------------------------------------------
欢迎使用CnPack IDE Wizards
http://www.cnpack.org/
作者:
男 wang_80919 (Flying Wang) ★☆☆☆☆ -
普通会员
2017/6/29 14:01:20
23楼: cnvcl 里头很多好代码,可惜只支持 WIN 或 VCL,大多数,不跨平台。
而且,很多人都不知道里头有好东西。
----------------------------------------------
(C)(P)Flying Wang
作者:
男 hz_2009 (盒子) ★☆☆☆☆ -
普通会员
2017/6/29 18:50:15
24楼: 楼主辛苦了。。。。
----------------------------------------------
-
作者:
男 hz_2009 (盒子) ★☆☆☆☆ -
普通会员
2017/6/29 18:54:09
25楼: 谢谢了。。。。。。
----------------------------------------------
-
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/7/1 17:47:01
26楼: 很久以前看过 CnCalendar.pas,是当年很多网页万年历都用台湾林先生的查表法,现在已经没人用了,查表法适合时间范围短,没有浮点运算能力的单片机或者嵌入设备使用,现在网站都用天文算法,而且大多数都用许先生的算法,虽然已经快十年了,但它是公认比较准确的,当然它是一个网页程序,控件没可能直接使用,控件比它更复杂,否则运算速度不会这么快。
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 99boy (爱吃巧克力的青蛙) ★☆☆☆☆ -
盒子活跃会员
2017/7/12 2:48:36
27楼: 楼主辛苦了!
----------------------------------------------
一只青蛙……
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/7/31 22:23:34
28楼: 我以为WinPE不支持OpenGL,控件绘不出图,结果可以正常运行,看来WinPE也不是阉割得那么厉害。
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 ptdelphi (Delphi) ▲▲▲▲△ -
普通会员
2017/8/1 16:27:44
29楼: 楼主辛苦了!
----------------------------------------------
还可以更好
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/8/2 23:45:52
30楼: 看到人家说画一条反锯齿的直线都没画好,其实FMX就是一个垃圾,我以后都不想碰它,不知道什么时候会踩坑里。

我这个控件的月亮图,可以在任何事件里面执行 MoonPhase.Draw(ACanvas,X, Y, Width, Height),就能把当天的月相绘制到 ACanvas 上面。

看清楚,月球不是固定的,是旋转的,我参考了宝岛天文台好几年的资料进行编程的,

月球本身是一张图片,装到后台的Canvas,旋转之后在 Copy 到 ACanvas 显示出来。

问题是,在控件的Paint事件里面执行MoonPhase.Draw的话,过程后台创建的Canvas只能装入图片,其它操作全部失效,就是画一个点也跟没画一样,更别说旋转了,根本上就是残废的,而且也不会报错。

但是,在其它事件,创建的后台Canvas一切正常,Paint事件不能用后台Canvas
完全不能接受。

当然,我也是刚学的,可能漏了什么,少写一行什么东西,造成这样也未可知,但是这是不合理的。

最后我是用自己的代码,爬到缓冲区搬字节,才得到月球旋转效果的,幸好速度也可以。

另一个问题,Canvas的原点,在Paint事件内和外完全不同,本来可以自动转换一下,保持一致性,结果要自己转换。

为了这些花了好几天来研究,而微软的OpenGL就完善得多了,没有这么荒谬的东西,所以VCL版本没多头痛就搞好了。

另外,千万不要在启动时做大量的文本或文本数组的操作,会长期黑屏和闪退,就是不要在 FormCreate 事件或者 FormShow事件里面做大量文本操作,其它更大量的操作反而没问题。

我的控件需要在控件启动时,对大量的文本进行解码操作,结果不管在真机还是模拟器,都是黑屏。装载巨型浮点数组反而没问题。

开始的时候不知道会这样,看着程序是没有错的,找不到原因,在VCL版本没有这个问题,后来做了很多测试才发现,现在改成弹性解码。
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 zhangshelly (雪莱) ★☆☆☆☆ -
盒子活跃会员
2017/8/3 8:16:20
31楼:
----------------------------------------------
-
作者:
男 nihaoqiang (haohao) ★☆☆☆☆ -
盒子活跃会员
2017/9/18 14:01:36
32楼: 厉害了,楼主!
专家级别
----------------------------------------------
-
作者:
男 delphiilove (乌羽玉) ★☆☆☆☆ -
普通会员
2017/9/18 15:55:23
33楼: 佩服楼主,感谢分享。
----------------------------------------------
-
作者:
男 xebaobei (神仔) ▲▲▲▲△ -
普通会员
2017/9/19 10:24:48
34楼: 楼主厉害,不知道您有没有根据经纬度、时间求太阳、月亮位置的算法?
----------------------------------------------
-
作者:
男 kinneng (kinneng) ★☆☆☆☆ -
盒子活跃会员
2017/9/22 13:38:59
35楼: 在Location属性输入经纬度,在Eclipse属性就可以得到当时的太阳和月亮的天文位置。
此帖子包含附件:
JPEG 图像
大小:180.8K
----------------------------------------------
声明:本人不在论坛询问任何编程问题,请不要将我的帖子当成问题来回答。炒股一天,编程三年,不浪费时间了。 经常在外面,没空,不要找我..
作者:
男 ashe (灰烬) ▲▲▲△△ -
普通会员
2024/7/6 14:30:19
36楼: 先生,你的分享链接都失效了。麻烦再分享一下。
----------------------------------------------
非职业程序员
作者:
男 keymark (嬲) ▲▲▲△△ -
普通会员
2024/7/6 14:34:01
37楼: 这个楼主很久没说话了哦。
码无的坏处就是这样啦。(没代码没人传播(存盘收藏。
----------------------------------------------
[alias]  co = clone --recurse-submodules  up = submodule update --init --recursiveupd = pullinfo = statusrest = reset --hard懒鬼提速https://www.cctry.com/>http://qalculate.github.io/downloads.htmlhttps://www.cctry.com/
作者:
男 cnpack (CnPack) ★☆☆☆☆ -
普通会员
2024/7/6 19:43:40
38楼: CnPack组件包的CnVcl里有历法计算单元及一简单的月历控件。
见 https://github.com/cnpack/cnvcl.git

历法单元:
cnvcl\Source\Common\CnCalendar.pas

例子:
cnvcl\Example\Calendar

微信公众号相关文章:
https://mp.weixin.qq.com/s/PJBbPGqx5EUy05nRPwiy3w
----------------------------------------------
欢迎使用CnPack IDE Wizards
http://www.cnpack.org/
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行170.166毫秒 RSS