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

למטה

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


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

כיצד להשוות שני תאריכים ולכתוב את ההבדל ביניהם למשתנה מסוג שלם שלם. לדוגמה, כך ש- 21.12.2001 מינוס 19.12.2001 שווה ל- 2.



Mick   (2001-12-19 18:18) [1]

Trunc (EncodeDate (2001,12,21)) - Trunc (EncodeDate (2001,12,19)) שווה בדיוק ל- 2



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

כתבתי את הדברים הבאים

procedure TForm1.Button1Click(Sender: TObject);
var
Cifra:Integer;
begin
Cifra:=Trunc(EncodeDate(2001,12,21))-Trunc(EncodeDate(2001,12,19));
end;

ודלפי כותב - [רמז] Unit1.pas (30): ערך שהוקצה ל- "Cifra" מעולם לא נעשה בו שימוש
מה זה?



LLL   (2001-12-19 21:16) [3]

זו רק אזהרה שלא משתמשים בשיפרה בשום מקום אחר.
מודאגת - האם שכחת מסיפרא?



a100   (2001-12-19 21:16) [4]

וכותב נכון! והיכן משתמשים בדרך כלל בתוצאה ?! המשתנה הוא מקומי



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

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

למעלה





זיכרון: 0.55 MB
זמן: 0.027 c
1-22213
T2
2001-12-16 07:14
2002.01.08
סודי Api & oth.


4-22503
יורה
2001-11-05 20:11
2002.01.08
הזן מחרוזת בחלון


1-22179
ikar
2001-12-21 09:10
2002.01.08
כיצד לחזור על צמתים שורשיים ב- TTreeView?


7-22437
פרדוקס
2001-09-25 18:48
2002.01.08
wav


1-22148
דלפימון
2001-12-20 12:10
2002.01.08
כיצד לשלוח הודעה למערכת שלוחצים על מקש?





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