Текущий архив: 2007.07.01;
Скачать: CL | DM;

Вниз

DriveList (ListBox) --> на ListView   Найти похожие ветки 

← →
GLXV   (2007-06-04 18:29) [0]

Как заменить в данном коде DriveList (ListBox) --> на ListView?

CM_Request_Device_Eject(DEVINST(DriveList.Items.Objects[DriveList.ItemIndex]), @VetoType, nil, 0, 0);

Ну, DriveList.ItemIndex = ListView.ItemIndex, я понимаю,
а с DriveList.Items.Objects как быть?

---

← →
GLXV   (2007-06-05 14:31) [1]

Уточню вопрос, возможно это поможет:

CM_Request_Device_Eject - для вызова "безопасного извлечения" подключенного к USB устройства. В DriveList (ListBox), изначально, помещалось:
DriveList.Items.AddObject(S + " " + ExtractSerialNumber(SymbolicName), TObject(Inst));
(Пр.: "G: 15F478A38")
я заменил на:
with ListView.Items.Add do
 begin
  Caption:=S; //диск
  SubItems.Add(ExtractSerialNumber(SymbolicName));
 end;

---

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

Текущий архив: 2007.07.01;
Скачать: CL | DM;

Наверх

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