Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.02.2014, 18:39   #1
mrDusha
Новичок
Джуниор
 
Регистрация: 28.02.2014
Сообщений: 2
По умолчанию работа в Excele через delphi

Можно ли как ни будь чтобы из edit вставить текст в ячейку excele? Если можно то как? Помогите пожадуйста
mrDusha вне форума Ответить с цитированием
Старый 28.02.2014, 18:52   #2
Streletz
Старожил
 
Регистрация: 03.01.2014
Сообщений: 2,870
По умолчанию

Можно. Здесь ИМХО есть 2 пути.
  1. Работать с Excel через COM
  2. Подключаться к Excel как к БД
Streletz вне форума Ответить с цитированием
Старый 28.02.2014, 19:19   #3
mrDusha
Новичок
Джуниор
 
Регистрация: 28.02.2014
Сообщений: 2
По умолчанию

Да я подключил как бд, а что делать дальше?
mrDusha вне форума Ответить с цитированием
Старый 28.02.2014, 19:27   #4
Streletz
Старожил
 
Регистрация: 03.01.2014
Сообщений: 2,870
По умолчанию

Цитата:
Сообщение от mrDusha Посмотреть сообщение
Да я подключил как бд, а что делать дальше?
Использовать SQL запрос.
Streletz вне форума Ответить с цитированием
Старый 28.02.2014, 19:53   #5
Rin
Негодник
Форумчанин
 
Аватар для Rin
 
Регистрация: 10.11.2009
Сообщений: 880
По умолчанию

ИМХО, если не знаете SQL, то через COM намного проще:
Код:
 uses .... , ComObj;

var
     Exc:Variant;
     name_excel:string;
     j: integer;
     i: char;
////////
////////
     iа OpenDialog1.Execute then
     name_excel:=OpenDialog1.FileName;
     Exc := CreateOleObject('Excel.Application');
     Exc.Workbooks.Open[name_excel];
     i:='A';
     j:=1;
     Exc.Range[i+IntToStr(j)]:=Edit1.Text;

     SaveDialog1.FileName:=copy(name_excel,1,length(name_excel)-4)+'_NEW.xls';
     if SaveDialog1.Execute then
     begin
     Exc.ActiveWorkbook.SaveAs(SaveDialog1.FileName);
     end;
Если помог, проси поставить минус. Будь оригинален!
Rin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Работа с Excel через Delphi Умфарг Помощь студентам 1 11.05.2012 13:31
Работа с Word через Delphi Ele Помощь студентам 0 16.05.2010 20:21
Работа с бд MySQL через Delphi и ZeosDB Новичок3 БД в Delphi 3 13.10.2009 10:20
Работа с WordPad через Delphi Pavelhr Общие вопросы Delphi 0 06.10.2008 21:54
работа с excel файлами через Delphi Winss Помощь студентам 6 08.09.2007 17:54