בית
Top.Mail.Ru Yandeks.Metrika
פורום: "ראשי";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למטה

כיצד להשוות תאריכים. מצא סניפים דומים


DerZky   (2001-12-18 19:54) [0]

שלום. המשימה היא זו: בהתחלה הראשונה של התוכנית, יש צורך לכתוב את תאריך ההתחלה ברישום, באלה הבאים, לחשב משתנה מהסוג מספר שלם בין התאריך של היום לתאריך שנרשם ברישום. במידת האפשר, ענה עם קוד. תודה



Anatoly Podgoretsky   (2001-12-18 20:39) [1]

ובכן אתה נותן :-)
משתנה מסוג TDate {Time} מהסוג כפול, שבו המספר השלם הוא מספר הימים, האם אתה באמת צריך דוגמא?



DerZky   (2001-12-19 19:16) [2]

אז מה
הליך TForm1.Button1 לחץ (שולח: TObject); var SD, SD2: מחרוזת; D, D2: TDateTime; D3: כפול; התחל מפריד תאריך: = "."; SD: = "30.10.00"; SD2: = "01.12.00"; D: = StrToDate (SD); D2: = StrToDate (SD2); D3: = D2-D; סוף;



עמודים: 1 ענף שלם

פורום: "ראשי";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למעלה









זיכרון: 0.55 MB
זמן: 0.033 c
14-22344
anod
2001-11-06 13:15
2002.01.08
צלבים - טו טאק


1-22176
Serg5
2001-12-20 14:57
2002.01.08
שוב, הבעיה בטקסט: אני מציג את Image1.Canvas.Text Out, אך מתחת לטקסט עצמו יש מסגרת לבנה. האם זה אפשרי, אם לא מוסר (רק כדי להטיל אותיות), אז לפחות להפוך את העגול השחור לשחור.


1-22115
דרצקי
2001-12-19 18:14
2002.01.08
כיצד להשוות תאריכים וההבדל ביניהם מקבלים מספר שלם


1-22063
אמנות
2001-12-18 15:12
2002.01.08
ואתה יכול לחסום את הגישה לתיקיה, משהו כמו fmShareExclusive, אבל לתיקיה ???


7-22449
Schummi
2001-09-15 07:45
2002.01.08
מועדפים של Windows





אפריקאנס אלבני ערבי אַרְמֶנִי אזרביג'אן הבסקים בלארוסית בולגרי קטלאנית הסיני (פשוט) סינית (מסורתית) קרואטית צ'כיה דני הולנדי אנגלית אסטוני פיליפיני פיני צרפתית
גליציה גאורגיה גרמני יווני קריאולית האיטית עברי הינדי הונגרי איסלנדי אינדונזי אירי איטלקי יפני קוריאני לטבי ליטאי מקדוניה מלאית מלטזית נורבגי
פרסי פולני פורטוגזי רומנית רוסי סרבית סלובקי סלובני ספרדי סוואהילית שבדי תאילנדי תורכי אוקראיני אורדו ויאטנמית וולשית יידיש בנגלית בוסנית
קבואנו אספרנטו גוג'ראטית האוסה המונג איגבו יָאוָנִי קנאדה לחמר לאו הלטינית מאורים מרתי מונגולי נפאלית פונג'בית סומליה טמילית טלוגו יורובה
זולו
Английский Французский Немецкий Итальянский Португальский Русский Испанский