VPF::вывод текста из listview в html - Форум программистов

fireofdeath

Дата 11.3.2011, 14:11 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 16
Регистрация: 21.6.2010

Репутация: нет
Всего: нет

Здравствуйте хотел бы увидеть совет или ткнуть меня, как можно вывести текст из listview в html страницу (в крайнем случае в word). Текст в listview я вывожу следующим способом.

Код



if TreeView1.Items[0].Selected then begin
    ListView1.Clear;
    GetColumns2(ListView1, ImageList1);
    LVMenu.Groups.Clear;
    lv := LVMenu;
    lv.GroupView:=true;

    lv.Groups.Add.Header:=('Свойства монитора');
    lv.Groups[0].GroupID:=0;
    li := lv.Items.Add;

    li := lv.Items.Add;
    li.ImageIndex :=7;
    li.GroupID:=0;
    li.Caption := 'Версия драйвера';
    li.SubItems.Add(MonitorDriverVersionReg);
end;

  if TreeView1.Items[3].Selected then begin
    ListView1.Clear;
    LVMenu.Groups.Clear;
    GetColumns2(ListView1, ImageList1);
    lv := ListView1;
    lv.GroupView:=true;

    lv.Groups.Add.Header:=('Свойства ЦП');
    lv.Groups[0].GroupID:=0;
    li := lv.Items.Add;

    li := lv.Items.Add;
    li.ImageIndex :=1;
    li.Caption := 'Физических процессоров';
    li.GroupID:=0;
    li.SubItems.Add(IntToStr(ProcessorInfo1.ObjectsCount));

    li := lv.Items.Add;
    li.ImageIndex :=1;
    li.GroupID:=0;
    li.Caption := 'Название';
    li.SubItems.Add(ProcessorNameReg);
end;

и т.д.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »