Переход на другую форму DBGrid

@HondaUS · Регистрация: 10.01.2014

Студворк — интернет-сервис помощи студентам

Как сделать чтобы на ВЫБРАННЫЙ элемент осуществлялся переход на следующие форму.
Нашел такой пример но он ругается на эту строку, есть варианты как сделать можно?) спасибо.

Delphi
1
2
3
4
5
6
7
8
9
10
procedure TForm1.GridCellClick(Column: TColumnEh); // <---
var
i, j:integer;
begin
i :=Grid.SelectedIndex; //номер столбца
j:=Grid.DataSource.DataSet.RecNo; // номер строки
if (i=3) and (j=4) then // например, если выделена ячейка в 4-м столбце 4-й строки, то
form2.ShowModal; //выводим форму
end;
end;

@krapotkin · 07.06.2016, 17:48

при чем тут НОМЕР ЗАПИСИ???
зачем вам номер столбца?

при каждом нажатии мышью на грид вы будете улетать в новую форму???

но даже в новой форме
а) запись датасета, на которой вы стояли в своем гриде, не изменится
б) можно перед показом формы заполнить ее любыми данными, а после показа - использовать то, что, возможно, там навводили...

@HondaUS · 07.06.2016, 17:51 **[ТС]**

Сообщение от krapotkin

при каждом нажатии мышью на грид вы будете улетать в новую форму???

Допустим есть 1 форма с таблицей в гриде, там я выбираю элемент, и перелатаю на другую форму. ( формы уже созданы)
Просто уже не знаю как это сделать все облазил, ересь везде

@krapotkin · 07.06.2016, 17:58

по каждому! карл!
хотя бы дабл-клик

а что еще-то непонятно?
открыл форму, и ?? там те же данные, из тех же датасетов - ешь-не хочу...

@HondaUS · 07.06.2016, 18:00 **[ТС]**

как сделать этот клик хотя бы чтобы допустим был 1 или 2 элемент и перелатал на другую форму, только без бутончика

@krapotkin · 07.06.2016, 18:04

что за бред?
событие OnDblClick не нашли??
никто никуда не перелетает, все руками у нас...
открыли форму, данные на ней откуда берутся??
сразу предупрежу - в гриде данных нет, не было и не будет никогда...

@HondaUS · 07.06.2016, 18:14 **[ТС]**

я имел ввиду что в таблице выбрали то что нам нужно щелкнули по нему он открыл другую форму

@krapotkin · 07.06.2016, 20:42

Delphi
1
2
3
4
5
6
7
8
9
10
procedure TForm1.Grid1DblClick(Sender:TObject);
var f:TOtherForm;
begin
f:=TOtherForm.Create(NIL);
if f.showModal=mrOk then
begin
  DoSomething();
end;
f.free;
end;

@HondaUS · 08.06.2016, 07:40 **[ТС]**

Сообщение от krapotkin

f:TOtherForm

эта форма которая откроется верно?
begin
DoSomething();
end;
а это что?

@krapotkin · 08.06.2016, 08:08

угу

DoSomething
у программистов принято давать названия так, чтобы можно было догадаться, что они делают
и формы
и кнопки
и все, что есть в программе

Новые блоги и статьи Все статьи Все блоги /
Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.

Переход на другую форму DBGrid

Решение

Решение

@krapotkin 6849 / 4676 / 1464 Регистрация: 14.04.2014 Сообщений: 20,668 Записей в блоге: 21
	07.06.2016, 17:48
	при чем тут НОМЕР ЗАПИСИ??? зачем вам номер столбца? при каждом нажатии мышью на грид вы будете улетать в новую форму??? но даже в новой форме а) запись датасета, на которой вы стояли в своем гриде, не изменится б) можно перед показом формы заполнить ее любыми данными, а после показа - использовать то, что, возможно, там навводили... 0

@krapotkin 6849 / 4676 / 1464 Регистрация: 14.04.2014 Сообщений: 20,668 Записей в блоге: 21
	07.06.2016, 17:58
	по каждому! карл! хотя бы дабл-клик а что еще-то непонятно? открыл форму, и ?? там те же данные, из тех же датасетов - ешь-не хочу... 0

@HondaUS 1 / 1 / 2 Регистрация: 10.01.2014 Сообщений: 105
	07.06.2016, 18:00 [ТС]
	как сделать этот клик хотя бы чтобы допустим был 1 или 2 элемент и перелатал на другую форму, только без бутончика 0

@krapotkin 6849 / 4676 / 1464 Регистрация: 14.04.2014 Сообщений: 20,668 Записей в блоге: 21
	07.06.2016, 18:04
	что за бред? событие OnDblClick не нашли?? никто никуда не перелетает, все руками у нас... открыли форму, данные на ней откуда берутся?? сразу предупрежу - в гриде данных нет, не было и не будет никогда... 0

@HondaUS 1 / 1 / 2 Регистрация: 10.01.2014 Сообщений: 105
	07.06.2016, 18:14 [ТС]
	я имел ввиду что в таблице выбрали то что нам нужно щелкнули по нему он открыл другую форму 0

@krapotkin 6849 / 4676 / 1464 Регистрация: 14.04.2014 Сообщений: 20,668 Записей в блоге: 21
	08.06.2016, 08:08
	Сообщение было отмечено HondaUS как решение Решение угу DoSomething у программистов принято давать названия так, чтобы можно было догадаться, что они делают и формы и кнопки и все, что есть в программе 1