Форум: "Основная";
Текущий архив: 2002.07.22;
Скачать: [xml.tar.bz2];
ВнизListBox Найти похожие ветки
← →
Александр (2002-07-11 15:44) [0]Столкнулся с акой ситуацией. Из реестра вытаскиваю все названия установленного программного обеспечения в ListBox1. В ListBox2 (который невидим и недоступен пользователю) из реестра вытаскиваю в ТАКОМ ЖЕ порядке пути к uninstallам. Задача такая: пользователь в ListBox1 выделяет какую-то строку и нажимает кнопку Удалить (Button1.Click). Мне надо узнать какой номер выделенной строки пользователем и запустить файл Uninstallяции, путь к которому указан в LixtBox2 в строке с тем же номером, что и выделеная строка в ListBox1. А как это сделать, не знаю.
← →
MBo (2002-07-11 15:46) [1]listBox1.ItemIndex
← →
Александр (2002-07-11 16:11) [2]Спасибо, а как получить текст из ItemIndex в переменную..например S?
← →
Skier (2002-07-11 16:12) [3]>Александр
S := listBox1.Items[listBox1.ItemIndex];
← →
Александр (2002-07-11 16:26) [4]Я сделал так, но ничего не происходит:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Application.Handle, nil,
PCHAR(listBox1.Items[listBox1.ItemIndex]),
nil, nil, SW_SHOWNORMAL);
end;
procedure TForm1.ListBox1Click(Sender: TObject);
begin
ListBox2.Itemindex:=ListBox1.Itemindex;
end;
← →
Skier (2002-07-11 16:30) [5]>Александр
А что у тебя вообще "приходит" в
listBox1.Items[listBox1.ItemIndex] ???
Сделай так что ли ShowMessage(listBox1.Items[listBox1.ItemIndex])
← →
MBo (2002-07-11 16:40) [6]как я понял, у тебя должно быть
PCHAR(listBox 2.Items[listBox1.ItemIndex]),
← →
Александр (2002-07-11 16:41) [7]>Skier: Смотрел, выходит: C:\WINNT\unvise32.exe C:\Program Files\Titovlab\uninstal.log
← →
Александр (2002-07-11 16:43) [8]Хм..странно.....с некоторыми программами выходит. Кажется я понял в чем дело. Спасибо.
← →
Александр (2002-07-11 16:52) [9]Надо просто заключить в кавычки путь к файлу, если они уже не заключны. Как это сделать, ведь Дельфи думает что эти кавычки надо убирать?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.07.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c