廣告廣告
  加入我的最愛 設為首頁 風格修改
首頁 首尾
 手機版   訂閱   地圖  簡體 
您是第 3044 個閱讀者
 
發表文章 發表投票 回覆文章
  可列印版   加為IE收藏   收藏主題   上一主題 | 下一主題   
summer60446 手機
個人文章 個人相簿 個人日記 個人地圖
小人物
級別: 小人物 該用戶目前不上站
推文 x0 鮮花 x14
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片
推文 x0
[Delphi][精華] 請問有關數學函式(日期問題)
就是 入境日期+工作期滿=期滿日

例如:2000年1月1日+1年5月30日=2001年7月1日

然後2000年1月1日跟1年5月30日這部分是要自己輸入的 ..

訪客只能看到部份內容,免費 加入會員 或由臉書 Google 可以看到全部內容



[ 此文章被summer60446在2005-08-10 03:15重新編輯 ]


獻花 x0 回到頂端 [樓 主] From:台灣中華電信 | Posted:2004-08-02 21:45 |
panasonic732 手機
個人頭像
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎
初露鋒芒
級別: 初露鋒芒 該用戶目前不上站
推文 x2 鮮花 x30
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

小弟我覺得應該是沒有

下面是引用summer60446於2004-08-2 9:45 PM發表的 [求助]請問有關數學函式:
就是 入境日期+工作期滿=期滿日

例如:2000年1月1日+1年5月30日=2001年7月1日

然後2000年1月1日跟1年5月30日這部分是要自己輸入的
.......
以我會的程式去編寫的話
2000年1月1日+1年5月30日=2001年7月1日
應該事先加年再來是加月數
在判斷該月數是30天或31天

閏年好像是除以4要等於0吧
小弟我做過...忘了那個判斷怎麼寫
希望能幫上您的忙 ... 有看到文章希望你回覆一下


[ 此文章被panasonic732在2004-12-23 20:40重新編輯 ]


憂慮不斷,心未寧靜
綿綿春雨,花失嬌艷
凋零磨滅,事情難回
得意失意,不再回想
放棄它吧,唯有如此
獻花 x0 回到頂端 [1 樓] From:未知地址 | Posted:2004-12-23 20:32 |
hojaming
數位造型
個人文章 個人相簿 個人日記 個人地圖
初露鋒芒
級別: 初露鋒芒 該用戶目前不上站
推文 x0 鮮花 x13
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

潤年:
1. 西元年/4的餘數為0:是潤年
2. 西元年/100的餘數為0:不是潤年
3. 西元年/400的餘數為0:是潤年

是否能貼個程式碼當做範例


[ 此文章被panasonic732在2005-01-15 22:52重新編輯 ]

此文章被評分,最近評分記錄
財富:10 (by panasonic732)


獻花 x0 回到頂端 [2 樓] From:台灣中華電信 | Posted:2005-01-15 16:04 |
nomaid 手機 會員卡
個人頭像
個人文章 個人相簿 個人日記 個人地圖
知名人士
級別: 知名人士 該用戶目前不上站
推文 x0 鮮花 x34
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

先給個我個人的初步想法 不知道正不正確~
目前沒有delphi可以提供測試~
所以只有大略的想法而已 可以先試試看

年份 月份 日期 各分為三個框框
也就是說
2000年 1月   1日     +   1年   5月     30日   =   2001年7月1日
EDIT1 EDIT2 EDIT3     EDIT4 EDIT5   EDIT6       後面結果可用label或是edit都可 也可用messagebox

程式寫法就讓 EDIT1的值 + EDIT 4的值 等於 一個變數 (PS:變數1)
            EDIT2的值 + EDIT 5的值 等於 一個變數 (PS:變數2)
            EDIT3的值 + EDIT 6的值 等於 一個變數 (PS:變數3)
然後
  判斷句就加在加法後面 使用 IF ELSE 去判斷 或是 while

個人淺見是 變數2 先判斷是否大於12 (判斷月份)
                如果大於 12的話 則 變數1 加 1
                    小於 12則判斷 是否為大小月
                  大月則判斷變數3 是否大於 31 (判斷日期)
                  小月則判斷變數3 是否大於 30 (判斷日期)
                      是則變數2 + 1 然後重新判斷月份 ~
                      否則則判斷年份
                      判斷是否為閏年可用上面大大的寫法
                          潤年:
                          1. 西元年/4的餘數為0:是潤年
                          2. 西元年/100的餘數為0:不是潤年
                          3. 西元年/400的餘數為0:是潤年

    最後算出來的變數 1 ,變數 2 ,變數 3 則可代入 顯示結果的欄位
        看是要用 文字框(Edit) 或是 標籤框 (Label) 或是 訊息視窗(showmessage)
        來表示都可以

以上是我的想法大概流程~
有點粗操 不過還請各位大大指點交流一下
也希望能讓樓主有所明白~

如果還有不了解的 可以再回文 大家一起討論討論^^

此文章被評分,最近評分記錄
財富:15 (by panasonic732) | 理由: 滿用心的...加5雅幣...更希望你做出來並放在範例區...^^



阿咧..謝謝各位送花大隊的版友們辛苦的送花
小弟非常感謝你們 不過 小弟很懶的每次都去開訊息
所以請你們之後可以不用送花給小弟了 謝謝你們了^^"
獻花 x0 回到頂端 [3 樓] From:台灣台灣索尼 | Posted:2005-01-15 22:28 |
nomaid 手機 會員卡
個人頭像
個人文章 個人相簿 個人日記 個人地圖
知名人士
級別: 知名人士 該用戶目前不上站
推文 x0 鮮花 x34
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

我已經把我寫好的程式 及說明 POST在範例區
請至範例區查看

http://bbs.mychat.to/read.php?tid=91687&fp=1



阿咧..謝謝各位送花大隊的版友們辛苦的送花
小弟非常感謝你們 不過 小弟很懶的每次都去開訊息
所以請你們之後可以不用送花給小弟了 謝謝你們了^^"
獻花 x0 回到頂端 [4 樓] From:局域網對方和您在同一內部網 | Posted:2005-01-17 15:07 |

首頁  發表文章 發表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.014470 second(s),query:16 Gzip disabled
本站由 瀛睿律師事務所 擔任常年法律顧問 | 免責聲明 | 本網站已依台灣網站內容分級規定處理 | 連絡我們 | 訪客留言