![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Куда поставили мою программу? [D7, WinXP]
Neznaika © (2005-01-14 11:57:00)По-моему этот вопрос уже обсуждался как-то, но я не обратил на него внимания - теперь жалею. Как узнать куда пользователь установил мою программу? Для инсталяции использую InnoSetup...
И еще второй вопрос: необходимо чтобы в стринггрид по клику правой кнопкой мыши выделялась строка над которой находится курсор и затем появлялось попуп меню. Сколько не мучался - не получается.
Заранее благодарен за любую информацию!!!
Neznaika (2005-01-14 12:42:00) [1]Спасибо begin..end and Fay ОГРОМНОЕ!!!
begin...end (2005-01-14 12:38:00) [2]> [4] Neznaika © (14.01.05 12:08)
Даже и попапить вручную не надо. Оставьте то меню, которое было, и напишите такой обработчик OnMouseDown:
procedure TForm1.StringGrid1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
ColNum, RowNum: Integer;
begin
if Button = mbRight then
with (Sender as TStringGrid) do
begin
MouseToCell(X, Y, ColNum, RowNum);
Row := RowNum
end
end.
Разумеется, чтобы выделялась целая строка, TStringGrid.Options должно включать goRowSelect.
begin...end (2005-01-14 12:11:00) [3]> [4] Neznaika © (14.01.05 12:08)
TStringGrid.[OnMouseDown, MouseToCell, Row).
Neznaika (2005-01-14 12:08:00) [4]Хорошо я отлучу и буду попапить вручную, но при этом все равно надо сделать выделение строки в гриде - правой кнопкой - КАК?
Fay (2005-01-14 12:05:00) [5]2 Neznaika © (14.01.05 12:03) [2]
Ничего. Отлучите StringGrid от PopupMenu, который нужно "попапить" вручную. Мне так каацца.
Neznaika (2005-01-14 12:03:00) [6]А по второму вопросу не?
Fay (2005-01-14 11:59:00) [7]ParamStr(0)