[Ztrel]

Здравствуйте, уважаемые программисты!
У меня очередная проблемка...

Как в компоненте StringGrid в Delphi при нажатии на любую ячейку определенного столбца (например столбца № 2) перенестись на другую форму + считать в строковую переменную текст, содержащийся в соседней слева ячейке?

P.S. Заранее спасибо всем, кто откликнется!

[Ztrel]

Ну ребяяяятаааа... Ну помогииите пожалуйста!

[Страдалецъ]

Используйте событие OnSelectCell в StringGrid

[Phedor]

Код:

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer;
  var CanSelect: Boolean);
var
  s: String;
begin
  if ACol=2 then // Если столбец 2-ой
  begin
    s := StringGrid1.Cells[ARow, ACol-1]; // Значение в ячейки "левее" в переменную "s"
    if not Assigned(Form2) then  // Если форма не инициализирована
    begin 
      Form2 := TFrom2.Create(Self); // То создаем форму
   end;
    Form2.ShowModal;  // Отображаем
    { Если форма была создана и отображается, то можно просто передать фокус Form2.SetFocus }
   end
  end;
  CanSelect := True;
end;

[Ztrel]

Спасибо большое! Помогло! )