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

למטה

קבצים וגישה מצא סניפים דומים


Kreo   (2001-12-20 21:16) [0]

שאלה. קניתי את הספר "תכנות על אובייקט פסקל בדלפי 5"
דיסקט עם דוגמאות של תוכניות נמכר עם הספר. מסומנת - התוכן של תקליטון תואם את הרישומים מתוך הספר. שאלה - מדוע הקוד הבא (מדוגמה) אינו מלוקט?

// ----------
סוג
אדם = שיא
f_name: string [20];
l_name: מחרוזת [20];
כתובת: מחרוזת [50];
גיל: בתים;
הסוף;

היה
f: קובץ של אדם;

דחייה

/ / דילג

הליך TForm1.Button1Click (שולח: TObject);
להתחיל
AssignFile (f, "c: \ sample.db");
{$ I-}
צרף (f);
{$ I +}
אם IOResult = 0 מכן
/ / דילג

// ---------

אז, על הקו צרף (f); המהדר נשבע - הם אומרים סוגים לא
התאמה. אמנם אם אתה משתמש בפקודה איפוס (f) או שכתוב {f}
לא מדברים מילה והכל עובד. למה



PVR   (2001-12-20 22:58) [1]

פקודת 'צרף' עם קובצי טקסט פועלת רק אם תזדקק לפקודות SEEK ו- Write.



SergVlad   (2001-12-20 23:05) [2]

צרף (..) עבור קבצי טקסט בלבד
f: TextFile;



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

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

למעלה









זיכרון: 0.55 MB
זמן: 0.025 c
4-22471
bsFrame
2001-11-02 11:42
2002.01.08
רכיב


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


1-22183
XeN
2001-12-21 11:21
2002.01.08
DelphiX_play


4-22461
Sha
2001-10-29 11:08
2002.01.08
בעיה עם LogonUser (ERROR_PRIVILEGE_NOT_HELD)


1-22157
דגל
2001-12-20 13:55
2002.01.08
מצא שתי מחזרות עגלות ברציפות.





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