VPF::Выделение строки в StringGrid - Форум программистов

Ser9a

Дата 2.12.2005, 08:29 (ссылка)

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

Загрузка ...

Шустрый

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

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

Здравствуйте!!!

На форме есть StringGrid у которого в свойствах включено goRowSelect. Когда кликаю левой клавишей мыши все замечательно строка выделяется вся.
Но как теперь программно выделить какую либо строку?
Мне необходимо чтоб строка выделялась например при нажатии правой клавишей мышки перед тем как появится всплывающее меню Popup.

SergeBS

Дата 2.12.2005, 09:46 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

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

SG1 = StringGrid

Код



var
    x1,y1 : integer;

procedure TForm1.sg1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  x1 := x;
  y1 := y;
end;

procedure TForm1.PopupMenu1Popup(Sender: TObject);
var
    c1,r1 : integer;
    NewSel: TGridRect;
begin
  SG1.MouseToCell(x1, y1, C1, R1);
  with SG1 do
  begin
    NewSel.Left := FixedCols;
    NewSel.Top := R1;
    NewSel.Right := ColCount - 1;
    NewSel.Bottom := R1;
    Selection := NewSel;
  end;
end;

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