delphi时间问题。解决了给分

xiaofeng007 2003-10-19 03:15:39

我知道当前系统的时间，如果求的本周星期一的时间和本月1号时间。

...全文

42 8 打赏收藏转发到动态举报

写回复

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

xiaofeng007 2003-10-19

打赏
举报

回复

r是什么类型的啦

ruthfox 2003-10-19

打赏
举报

回复

这个当然可以的，SpeedButton可以和一个PopupMenu联系在一起的，Button1: BitBtn好像不行的，就麻烦一下，写几句语句：]
r := Button1.ClientToStreen(Point(Button1.Left, Button1.Top + Button1.Height));
PopupMenu1.Popup(r.x, r.y);

47522341 2003-10-19

打赏
举报

回复

出现什么菜单；
选择时间的菜单吗？monthcalendar

xiaofeng007 2003-10-19

打赏
举报

回复

如果我想在点击BitBtn时出现一个菜单，可以实现这个功能吗？

ruthfox 2003-10-19

打赏
举报

回复

求本月1号：
DecodeDate(Date, y, m, d);
本月1号 := EncodeDate(y, m, 1);

求星期一几号:
a := DayOfWeek(Date) mod 7 - 1;
几号 := Date - a;

xiaofeng007 2003-10-19

打赏
举报

回复

我想求本周星期一是几号？

pankun 2003-10-19

打赏
举报

回复

你求你星期一的啥子时间哦?
问题没说清...

xiaofeng007 2003-10-19

打赏
举报

回复

我在delphi7中用DateTimePicker可以得到当前时间。如何求的本周星期一时间，有没有人帮忙

完美解决需要长时间等待的动画窗口,通过线程机制，同时进行封装处理，方便程序调用。

时间比较函数 CompareDateTime() //比较两个时间是否相同 CompareDate() //比较两个时间的日期是否相同 CompareTime() //比较两个时间的时分秒是否相同 SameDateTime() //比较两个时间是否相同 SameDate() //比较两个时间的日期部分是否相同 SameTime() //比较两个时间的时分秒是否相同前3个函数的返回值

1、对接JAVA接口时时间格式中存在带T的格式例如 2021-12-23T08:08:08 样式。最开始的处理方式是字符串替换将T替换 '' 例如 sTDate= sTDate.replace('T', ' ')，运行时间久了会出现部分时间转换失败问题。决定彻底处理此问题，偷懒不得。使用 Soap.XSBuiltIns 单元中的TXSDateTime 类处理 sDate:= '2021-12-23T08:08:08' XSDateTime:= TXSDat...

今天用delphi写个程序，使用datetimepicker获得想要的时间。蛋疼的问题是无论怎么调整明明看着控件里面的日期变了，但是show出来的datetimepicker.datetime日期都不变。娘的，网上居然找半天没找到解决办法。后来属性里偶然发现有个DateMode属性是：dmComboBox，才想起来一开始的时候，为了显示出小时和分钟而把Format和Kind都设置成了时间模式。所以...

这段时间在用DELPHI做一个财务系统时发现每一行的小计取了两位小数后与用SQL的ROUND查询出来的不一样，在程序中是用FormatFloat('0.00',ItemSum)函数来取值的，再用DXDBGRID网格显视合计，最终与SELECTSUM(ROUND(ITEMSUM,2))得出的结果是不一样的。例如ItemSum:=1.005，在程序FormatFloat('0....

数据库相关

2,497

社区成员

88,445

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章