
[Turbo Pascal]wyciąganie daty, czasu itp
#1
Napisano 15 01 2008 - 07:34
Chodzi mi o TP
Potrzebne są mi kody które z Windowsa będą wyciągały
-datę
-czas
-ile komputer już chodzi (miałem ten kod ale do Delphi a mi potrzebny do pascala.)
-ewentualnie z jakiego systemu korzystamy !
Bardzo proszę o pomoc ! Z góry dziękuje ludziom dużej wiedzy @
#2
Napisano 15 01 2008 - 15:25
Co do tego pokazywania nazwy systemu to raczej tego nie znajdziesz w standardowych modulach Free Pascal'a Ogólnie dosylam do http://www.freepascal.org/docs.html tam to napewno jest napisane.Reference for unit 'dateutils': Constants
ApproxDaysPerMonth Average number of days in a month, measured over a year. Used in MonthsBetween.
ApproxDaysPerYear Average number of days in a year, measured over 4 years. Used in YearsBetween.
DayFriday ISO day number for Friday
DayMonday ISO day number for Monday
DaySaturday ISO day number for Saturday
DaysPerWeek Number of days in a week.
DaysPerYear Array with number of days in a year. The boolean index indicates whether it is a leap year or not.
DaySunday ISO day number for Sunday
DayThursday ISO day number for Thursday
DayTuesday ISO day number for Tuesday
DayWednesday ISO day number for Wednesday
MonthsPerYear Number of months in a year
OneHour One hour as a fraction of a day (suitable for TDateTime)
OneMillisecond One millisecond as a fraction of a day (suitable for TDateTime)
OneMinute One minute as a fraction of a day (suitable for TDateTime)
OneSecond One second as a fraction of a day (suitable for TDateTime)
RecodeLeaveFieldAsIs Bitmask deciding what to do with each TDateTime field in recode routines
WeeksPerFortnight Number of weeks in fortnight
YearsPerCentury Number of years in a century
YearsPerDecade Number of years in a decade
YearsPerMillennium Number of years in a millenium
PS.
Nie wiem czemu to chcesz napisac w pascalu ale ok.
#3
Napisano 18 01 2008 - 20:39

#4
Napisano 19 01 2008 - 14:16
Użytkownicy przeglądający ten temat: 1
0 użytkowników, 1 gości, 0 anonimowych