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

למטה

העבר נתונים לתא גיליון עבודה של Excel מצא סניפים דומים


Striker   (2001-12-13 07:59) [0]

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



perov   (2001-12-13 08:21) [1]


ExcelApplication.Connect;
ExcelApplication.Workbooks.Add("", 0);
ExcelWorkbook.ConnectTo(ExcelApplication.ActiveWorkbook);
ExcelWorksheet.ConnectTo(ExcelWorkbook.Sheets[1] as _WorkSheet);
ExcelWorksheet.Activate;
ExcelWorksheet.Cells.Item[j,1].Value := j - i;
ExcelApplication.Visible[0] := True;



KIR   (2001-12-13 08:32) [2]

להלן השאלה המתבקשת, אבל אז איך לסגור נכון את ה- XL הזה? ואז יש לי העברה חד פעמית (אם כי מ- Excel "I) עובדת, ואם תנסו שוב, אז - שגיאת הקצאת זיכרון ...



perov   (2001-12-13 08:44) [3]

ExcelApplication.Disconnect;



Striker   (2001-12-13 09:00) [4]

תודה רבה אני אנסה בבית.



KIR   (2001-12-13 12:02) [5]

> פרוב
כבר כתבתי
ו- ExcelApplication. נתק,
ו- ExcelApplication.Quit,
ו- FreeAndNil (ExcelApplication) ...
לא עוזר, הנה קטע קוד:

ExcelApplication1.Connect;
ExcelApplication1.WorkBooks.Add (n, 0); // n - שם הקובץ
ExcelWorkBook1.ConnectTo (ExcelApplication1.ActiveWorkBook);

{גוף התוכנית}

ExcelApplication.WorkBook1.Close;
ExcelApplication1.Disconnect;



perov   (2001-12-13 12:33) [6]

ExcelWorksheet.Disconnect;
ExcelWorkbook.Close;
ExcelApplication.Disconnect;



Олег Лаукарт   (2001-12-13 13:33) [7]

יש כמה מאמרים על עבודה עם Excel בממלכת דלפי



Ынс   (2001-12-13 14:32) [8]

// הוסף את זה למודולים
משתמש Comobj;
...
היה
xlApp: וריאנט;
DataArray: Variant; // מערך דו ממדי יהיה כאן
rv: אמיתי;
להתחיל
rv: = 10.56568;
xlApp: = CreateOleObject ("גיליון Excel"); // ליצור
xlApp.Application.Visible: = נכון;

xlApp.Application.Cells [1, 2]. ערך: = "23456346"; // כך

xlApp.Application.Range ["RealValue1"]. ערך: = rv; {אתה יכול לעשות זאת: "RealValue1" - שם התא ב"תאים "}

xlApp.Application.Range ("A1: B8"). ערך: = "רק מחרוזת למילוי הטווח"; {מלא את הטווח בשורה אחת}


DataArray: = VarArrayCreate ([0,2,0,2], varVariant); {צור מערך של סוג סוג לאחסון ערכים כלשהם}
DataArray [0, 0]: = "אלמנט מערך";
DataArray [1, 0]: = 38754; // גם אלמנט מערך

{הקצה את כל המערך לקישור בבת אחת ... בזול, באופן אמין ומעשי = =) = במיוחד כשצריך להעביר מערך של אלפי שורות 5 בגודל לדוח ... אם תעשה זאת באמצעות לולאה למען, הדוח ייווצר קטלני}

xlApp.Application.Range ("A1: C3): = DataArray;

// שמור קובץ זה למשך הזמן = -)
xlApp.SaveAs ("c: \ docs \ rapporten \ sample1.xls");

DataArray: = לא הוקצה; // רצועות לטאטא
xlApp: = לא הוקצה; // באנג וזה ...
הסוף;



Striker   (2001-12-15 11:06) [9]

חיטטתי כאן ומצאתי אתר אינטרנט (WWW.afalinasoft.com), שם זה נובע בדיוק מהאינטראקציה של דלפי ואקסל.



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

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

למעלה





זיכרון: 0.57 MB
זמן: 0.026 c
4-22493
mangoost
2001-11-05 12:06
2002.01.08
כיצד לעקוף הפרת גישה בעת ניסיון לכתוב (+)


4-22507
סלאווייק
2001-11-06 17:55
2002.01.08
אייקונים של המערכת


7-22430
אלכס
2001-09-21 12:28
2002.01.08
נעילת מפתח


6-22268
וואהה
2001-10-05 13:25
2002.01.08
למרכיב WebBrowser אין פרמטר מפנה


14-22363
צפוף
2001-11-02 18:16
2002.01.08
אז ...?





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