Delphi用回圈陳述句“輸入年月日輸出是這一年的第幾天”！！！啊啊啊謝謝各位大佬啊！！！
uj5u.com熱心網友回復：
參考 DateUtils，使用DayOfTheYear函式就可以了DayOfTheYear(dtpSomeDay.DateTime)
uj5u.com熱心網友回復：
[錯誤] Unit1.pas(30): Undeclared identifier: 'dtpSomeDay'
我檢測出現這個問題，奇怪了
uj5u.com熱心網友回復：
人家是要求輸入年月日，然后用回圈判斷，這里涉及幾個時間處理函式：1、字串日期轉DateTime，用StrToDateTime
2、EndOfTheYear 可以獲取指定日期的最后一天
3、StartOfTheYear 可以獲取指定日期的年份第一天日期
4、回圈里用 IncDay 累加日期，判斷跟輸入日期間隔（函式 DaysBetween） 是否是0，如果為0，回圈結束，也就知道第x天了
uj5u.com熱心網友回復：
dtpSomeDay是測驗用的DateTimePicker控制元件 -_-
uj5u.com熱心網友回復：
謝謝賜教，我再學習研究一下轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/17672.html
標籤：語言基礎/算法/系統設計
上一篇：只奇怪的現象，程式中只要用上Random函式，雖然編譯通過但成生不了exe,系統會誤認為是病毒。
下一篇：c語言實驗