Visual C+, Delphi програмисти спешно!!!

Момчета, моля ви имам нужда от помощ. Във вторник имам да предавам курсова работа, а нищо не разбирам. Условието на задачата е на някой от тия езици да се направи приложение интегриращо MS Excel, да създава нова таблица и да се попълва в табл. с база данни.........Нищо не ми говори:(((((
Моля ви ако имате подобна задача на какъвто и да е език, или знаете някой сайт с подобни примерчета моля помогнете.........
e-mail: nadejda_a@yahoo.com

Мило приятелче,

1. Какво учиш и къде?
2. Кой и по каква дисциплина ти дава такава странна задачка.
3. Вероятността да получиш отговор,за съжаление е твърде малка. Предвид
това което разбрах, считам, че професионалните програмист не следва
да проявяват "свтъхинтерес" към "омешване" на desktop технологии със
сериозни неща. Абе тези от Microsoft, че са нахални, това го знае целия свят.
Но защо на тази тема се връзват преподаватели, които ти искат нещо?
Сигурно има за какво.
4. Delphi i C++ нямат общо в случая. Тук става въпрос за съвсем други неща.
Пък те не си и приличат по никакви критерии, освен че, в тях се говори
за OOP.

Ако имаш познати които са си трошили главата с ODBC (да речем), те
по-добре ще те насочат към решаване на тази задачка.

Поздрави: Любо

... само в натура.

Проекта е точно това което искаш. Прехвърляне на данни между приложението и Excel. Napisah go nabyrzo na Delphi5, no ti che mjesh da go kompilirash i na po niska versia.

PS: V koda sym dobavil komentari.

Не знам какво точно ти е пратил Shveik, но имай на предвид, че по принцип "използването" на Excel под Delphi е свързано с доста главоболия. Кода за различните версии на Excel е различен. Най-лесно е да се използва типа variant, но той е доста бавен. Тук ще ти нахвърлям някои идеи.
var
V, Sheet : variant
const
xlWorksheet = -4167;

V := CreateOleObject('Excel.Application');
V.Visible := True;
V.Workbooks.Add(xlWorksheet)
V.Workbooks[1].WorkSheets[1]:='Delphi Data';{трябва да си сигурна, че това е твоят Worksheet!!!}
Sheet := V.Workbooks[1].WorkSheets['Delphi Data'];
{Достъп до произволна клетка в Excel - вече спокойно можеш да прехвърляш каквото искаш от Delphi}

Sheet.Cells[i,j] := 10; {или каквото поискаш}
Sheet.Cells[1,1] := 'Sum(A1:A10)'; {формула се задава така}
if not VarIsEmpty(V) then V.Quit;


Набързо го нахвърлях това, така че възможно да има и някои грешки. Ако имаш проблеми пиши на tanu78@yahoo.com или ICQ 43418178

Уча в ТУ - къде другаде могат да дадат такава задача:((. Предмета е ООПРС - Обектно-ориентирано програмиране в разпределена среда и там уж учим Delphi....

Smotaniak!!! Nameri si rabota !

Поради някаква случайност вече си имам такава.

da si nameri rabota,
ili da si nameri rabotata???

Abe Gri6a Pak li Sgafi?