Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ListBox


Александр ©   (2002-07-11 15:44:00) 

Столкнулся с акой ситуацией. Из реестра вытаскиваю все названия установленного программного обеспечения в ListBox1. В ListBox2 (который невидим и недоступен пользователю) из реестра вытаскиваю в ТАКОМ ЖЕ порядке пути к uninstallам. Задача такая: пользователь в ListBox1 выделяет какую-то строку и нажимает кнопку Удалить (Button1.Click). Мне надо узнать какой номер выделенной строки пользователем и запустить файл Uninstallяции, путь к которому указан в LixtBox2 в строке с тем же номером, что и выделеная строка в ListBox1. А как это сделать, не знаю.


Александр   (2002-07-11 16:52:00) [1]

Надо просто заключить в кавычки путь к файлу, если они уже не заключны. Как это сделать, ведь Дельфи думает что эти кавычки надо убирать?


Александр   (2002-07-11 16:43:00) [2]

Хм..странно.....с некоторыми программами выходит. Кажется я понял в чем дело. Спасибо.


Александр   (2002-07-11 16:41:00) [3]

>Skier: Смотрел, выходит: C:\WINNT\unvise32.exe C:\Program Files\Titovlab\uninstal.log


MBo   (2002-07-11 16:40:00) [4]

как я понял, у тебя должно быть
PCHAR(listBox 2.Items[listBox1.ItemIndex]),


Skier   (2002-07-11 16:30:00) [5]

>Александр
А что у тебя вообще "приходит" в
listBox1.Items[listBox1.ItemIndex] ???

Сделай так что ли ShowMessage(listBox1.Items[listBox1.ItemIndex])


Александр   (2002-07-11 16:26:00) [6]

Я сделал так, но ничего не происходит:
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:12:00) [7]

>Александр
S := listBox1.Items[listBox1.ItemIndex];


Александр   (2002-07-11 16:11:00) [8]

Спасибо, а как получить текст из ItemIndex в переменную..например S?


MBo   (2002-07-11 15:46:00) [9]

listBox1.ItemIndex


Наверх

Титульная страница Поиск, карта сайта Написать письмо