[Ztrel]

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

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

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

[Ztrel]

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

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

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

[Phedor]

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

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]

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