Скачать: CL | DM;

Возможно ли передать данные из listview в exsel   Найти похожие ветки 

← →
Гаврилов В.А.   (2005-07-04 22:34) [0]

Здравствуйте!

Подскажите пожалуйста возможно ли передача данных из listview в Exsel. И есть ли какие-нибудь примеры. Киньте пожалуста ссылку.

Виталий

---

← →
evvcom ©   (2005-07-05 08:30) [1]

Возможно. "Exsel" пишется так: "Excel". А в чем собственно проблема? В чтении данных из listview или передача их в Excel?

---

← →
Anatoly Podgoretsky ©   (2005-07-05 08:39) [2]

Верояно возможно, даже точно возможно, если мы говорим об одном и том же продукте.

---

← →
zorik ©   (2005-07-05 10:30) [3]

http://www.kornjakov.ru/stat.htm#s4
http://www.kornjakov.ru/stat.htm#s5
http://www.kornjakov.ru/stat.htm#s6

---

← →
Гаврилов В.А.   (2005-07-07 18:30) [4]

Спасибо за ссылки но в них нет того чего я хотел, такая литература у меня есть (ну подобная) помогите ссылкой где есть реальный пример

---

← →
evvcom ©   (2005-07-08 00:08) [5]

> но в них нет того чего я хотел

А ты так толком и не сказал, чего же ты хотел? Примера в точности соответствующего твоим хотелкам ты скорее всего не найдешь, если, конечно, эти твои хотелки не ограничиваются написанием "Hello, World!" Поэтому учись свою задачу разбивать на подзадачи, и искать примеры, похожие на твои подзадачи.

---

← →
GanibalLector ©   (2005-07-08 00:51) [6]

Ну,вот тебе пример. Больше писать в лом.Надеюсь все понятно ;)

procedure TForm1.LOLClick(Sender: TObject);
  var XLApp:Variant;
   i:Integer;
begin
XLApp:=CreateOleObject("Excel.Application");
 try
  XLApp.Visible:=true;
  XLApp.WorkBooks.Add;
  XLApp.WorkBooks[1].WorkSheets[1].Name:="GanibalLector";
  for i:=0 to ListView1.Items.Count-1 do
    XLApp.WorkBooks[1].Sheets[1].Cells[i+1,1]:=
     ListView1.Items[i].Caption;
 finally
   XLApp:=UnAssigned;
 end;
end;


---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c