ello我不知道如何編寫一個delphi程序,該程序以合適的輸入組件獲取從點A到點B所花費的分鐘數爲例。 65分鐘是1小時5分鐘,現在我的問題是怎麼寫呢?delphi將分鐘轉換爲分鐘
-5
A
回答
11
您可以使用div
和mod
,integer division and modulus operators。
procedure ConvertMinutesToHoursAndMinutes(
Input: Integer; out Hours, Minutes: Integer);
begin
Hours := Input div 60;
Minutes := Input mod 60;
end;
+0
我將如何做到這一點與DIV和MOD – user2108831 2013-02-25 21:17:49
+0
對不起,但我不明白,評論。你只需要在答案中使用代碼。它就在你身邊。 – 2013-02-25 21:19:07
+0
好,所以編碼應該看起來像這樣然後 – user2108831 2013-02-25 21:24:41
2
一個很好的格式化程序可能是這樣的:
function MinutesToStrEx(const Minutes: Cardinal): string;
var
D, H, M: Integer;
begin
H := M div 60;
M := M mod 60;
D := H div 24;
H := H mod 24;
if D > 0 then
if (H <> 0) or (M <> 0) then
Result := Format('%d days %d hours and %d minutes', [D, H, M])
else
Result := Format('%d days', [D]);
else if H > 0 then
if M > 0 then
Result := Format('%d hours and %d minutes', [H, M])
else
Result := Format('%d minutes', [M]);
end;
然後調用它像這樣:
begin
Label1.Caption := 'Ellapsed time to reach from A to B: ' + MinutesToStrEx(Minutes);
end;
相關問題
- 1. 將時鐘時間轉換爲分鐘
- 2. 如何將分鐘轉換爲PHP和負數分鐘的小時和分鐘?
- 3. 在T-SQL中將分鐘轉換爲小時和分鐘
- 4. 使用R將1分鐘數據轉換爲5分鐘
- 5. 將分鐘轉換爲小時,分鐘和秒
- 6. 將分鐘轉換爲小時和分鐘
- 7. 使用PHP將小時和分鐘轉換爲分鐘
- 8. 將總分鐘轉換爲天數,小時數,分鐘數vb
- 9. Mysql將分鐘轉換爲一天的小時分鐘
- 10. 如何在SQL中將分鐘轉換爲小時分鐘和秒鐘?
- 11. Sqlite分鐘轉換
- 12. 將秒轉換爲小時和分鐘
- 13. 將整型字段轉換爲分鐘
- 14. php將數字轉換爲分鐘
- 15. 使用javascript將HH:MM:SS轉換爲分鐘
- 16. 將像素轉換爲分鐘
- 17. DATEDIFF將分鐘轉換爲十進制
- 18. 將毫秒轉換爲分鐘
- 19. MySQL將分鐘轉換爲秒
- 20. 將數字秒轉換爲分鐘powerBI
- 21. 將分鐘數轉換爲hh:mm
- 22. 如何將hh:mm:ss轉換爲分鐘
- 23. XPath 1.0:將ss轉換爲分鐘,秒
- 24. pandas - 將列轉換爲分鐘值
- 25. 將分鐘轉換爲HH24:MI格式
- 26. 將分鐘轉換爲毫秒Java/android
- 27. 將小時轉換爲分鐘
- 28. Mp3將分鐘轉換爲毫秒
- 29. 使用datetime將分鐘轉換爲月
- 30. 如何分鐘轉換爲天,小時,分鐘
你應該考慮一些清晰度修改你的問題,我有霧知道你在問什麼,它已被回答和接受,但很難理解這個問題。 – 2013-02-26 00:07:29