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

למטה

עזור לאנשים טובים מצא סניפים דומים


Катерина   (2001-12-20 07:37) [0]

Dobrenko utrechko. יש לי קצת קושי - אני לא יכול להסיר את הקו מהמחרוזת. איזו פונקציה נדרשת ועם אילו פרמטרים? ניסיתי להחיל מחיקה, אך משהו דלפי בפרמטרים לא מתאים.



gek   (2001-12-20 08:01) [1]

נוהל TFormEnterData.StringGrid1 KeyDown (שולח: TObject; var מפתח: Word; Shift: TShiftState); var TStr: TStrings; התחל אם מקש = VK_DELETE אז אם MessageDlg ("מחק את הרשומה הנוכחית?", MtWarning, [mbOk, mbCancel], 0) = mrOk אז עם StringGrid1 לעשות התחל אם RowCount = 2 אז התחל StringGrid1.RowCount: = 2; StringGrid1.Rows [1]. יציאה סוף; TStr: = שורות [RowCount-1]; שורות [(StrToInt (LabelPosition.Caption))]: = TStr; RowCount: = RowCount - 1; LabelCountRows.Caption: = IntToStr (RowCount -1); סוף; סוף;



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

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

למעלה









זיכרון: 0.55 MB
זמן: 0.022 c
3-21978
עובד אנונימי
2001-12-04 20:25
2002.01.08
ADO + Excel + Delphi5


1-22151
קוק
2001-12-20 14:06
2002.01.08
MDI -ClientForm


3-21974
Dup
2001-12-06 10:30
2002.01.08
TQRExpr


1-22241
יוראז
2001-12-17 10:09
2002.01.08
FileListBox1.FileName מחזירה את הנתיב המלא לקובץ, כיצד להפוך אותו להחזיר רק את שם הקובץ?


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





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