Перенос данных из одной формы на другую

@neznayka · Регистрация: 13.05.2012

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

В программе есть DBGrid, который выводит данные из бд. По двойному клику по записи в столбце ФИО открывается форма с информацией о данном человеке, но выводится только информация о первой записи.
Как сделать так, чтобы, нажав на запись в таблице, на форме отображалась соответствующая этой записи информация? Подскажите пожалуйста.

The_Immortal · 11.06.2012, 17:21

neznayka, текущий обработчик двойного клика по записи в студию.

@neznayka · 11.06.2012, 17:26 **[ТС]**

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

neznayka, текущий обработчик двойного клика по записи в студию.

Там, пока что, только появление формы.

The_Immortal · 11.06.2012, 18:01

neznayka, тогда просто считываете ID данной записи и при появлении формы делаете запрос типа:

C++
1
2
3
...
ADOQuery1->SQL->Add("SELECT * FROM MyTable WHERE ID =" + DBGrid1->DataSource->DataSet->FieldByName("ID")->AsString);
...

Далее заполняете свои Edit'ы (или что там у Вас) на этой форме следующим образом:

C++
1
Edit1->Text = ADOQuery1->FieldByName("Field1")

Ну и так далее.

Добавлено через 20 минут
Меня вот больше интересует какое Вы все-таки событие взяли.

Не

C++
1
2
3
void __fastcall TForm1::DBGrid1DblClick(TObject *Sender)
{
}

случайно?

@neznayka · 11.06.2012, 18:27 **[ТС]**

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

neznayka, тогда просто считываете ID данной записи и при появлении формы делаете запрос типа:

C++
1
2
3
...
ADOQuery1->SQL->Add("SELECT * FROM MyTable WHERE ID =" + DBGrid1->DataSource->DataSet->FieldByName("ID")->AsString);
...

Добавлено через 20 минут
Меня вот больше интересует какое Вы все-таки событие взяли.

Не

C++
1
2
3
void __fastcall TForm1::DBGrid1DblClick(TObject *Sender)
{
}

случайно?

Именно его и взял -

C++
1
void __fastcall TForm1::DBGrid1DblClick(TObject *Sender)

.
то что вы написали выше я попробовал, результат - тот же.

The_Immortal · 11.06.2012, 18:34

neznayka, ну давайте тогда проект.

Что-то не так сделали.

@neznayka · 11.06.2012, 18:45 **[ТС]**

Вывод информации на второй форме сделан. Вся проблема в том, что не хочет отображаться информация необходимой мне записи.
P.S. За бд не ругаться, знаю что кириллицу использовать не рекомендуется.

The_Immortal · 11.06.2012, 19:17

neznayka, я ругаться за другое буду.

С какой радости у нас 2 ADOConnection? БД - одна, соединение с ней должно быть одно.

Добавлено через 10 минут
Вот если все нормально там настроить и дописать нормальны образом запрос (я-то думал, что вы знаете как они полноценно пишутся), то будет все работать.

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::DBGrid1DblClick(TObject *Sender)
{
//Form2->ShowModal();
 
Form2->ADOQuery1->Close();
Form2->ADOQuery1->SQL->Clear();
Form2->ADOQuery1->SQL->Add("SELECT * FROM Таблица1 WHERE Регистрационный_номер =" + \
DBGrid1->DataSource->DataSet->FieldByName("Регистрационный_номер")->AsString);
Form2->ADOQuery1->Open();
 
ShowMessage(Form2->ADOQuery1->FieldByName("Регистрационный_номер")->AsString);
}

- вот таким образом по щелчку получаю "Регистрационный_номер". Соответственно это (и не только это) можно поместить в поле следующей формы.

@neznayka · 11.06.2012, 19:18 **[ТС]**

Об этом я тоже хотел спросить, как не использовать второе соединение?
а использовал его что бы отобразить данные на этой форме.

The_Immortal · 11.06.2012, 19:23

neznayka, соединение должно быть одно.
А... У Вас еще везде DBEdit'ы понаставлены. Чудно. Ну тогда в каждом из них (на Форме2) в качестве DataSource выбирайте Form1.DataSource1 и тогда не надо никакого запроса.
Просто:

C++
1
2
3
4
void __fastcall TForm1::DBGrid1DblClick(TObject *Sender)
{
Form2->ShowModal();
}

@neznayka · 11.06.2012, 20:03 **[ТС]**

Вот если все нормально там настроить и дописать нормальны образом запрос (я-то думал, что вы знаете как они полноценно пишутся)

Нам многого не объясняют, приходится самому узнавать, искать, изучать, поэтому есть ошибки.

The_Immortal · 11.06.2012, 20:05

neznayka, нам вообще ничего по этому не объясняли, так что это нормальная практика

Разобрались?

@neznayka · 11.06.2012, 20:12 **[ТС]**

Пока что нет. Пытаюсь сделать одно соединение.

The_Immortal · 11.06.2012, 20:14

neznayka, ну я вроде все доступно объяснил... Видимо, все-таки нет. Читайте ПМ тогда.

@neznayka · 11.06.2012, 20:37 **[ТС]**

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

neznayka, соединение должно быть одно.
А... У Вас еще везде DBEdit'ы понаставлены. Чудно. Ну тогда в каждом из них (на Форме2) в качестве DataSource выбирайте Form1.DataSource1 и тогда не надо никакого запроса.
Просто:

C++
1
2
3
4
void __fastcall TForm1::DBGrid1DblClick(TObject *Sender)
{
Form2->ShowModal();
}

Вот похоже сделал как вы сказали, но всё так же отображается первая запись.

The_Immortal · 11.06.2012, 20:50

neznayka, зачем Вы ввели еще один DataSource на Form1?

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

Ну тогда в каждом из них (на Форме2) в качестве DataSource выбирайте Form1.DataSource1

@neznayka · 11.06.2012, 20:55 **[ТС]**

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

neznayka, зачем Вы ввели еще один DataSource на Form1?

Ввёл ещё один, потому что DataSource1 занят под запрос, который используется в DBGrid1. Если выбрать в DBEdit на 2 форме Form1.DataSource1, то на 2 форме сможет отображаться только 3 поля.

The_Immortal · 11.06.2012, 21:05

neznayka, а DataSource2 у Вас чем занят? У Вас уже намечается избыточность компонентов...

Пф... Как все туго-то

Короче, на данный момент, у Вас DataSource3 содержит набор данных ADOTable2, который в свою очередь содержит "Таблица1".
DBGrid1 содержит DataSource1, который ссылается на набор данных ADOTable1, который в свою очередь содержит "Таблица1".

Когда вы перемещаетесь по записям в DBGrid1, происходит изменение DataSource1, а DataSource3 сидит на месте и "отображает" курсор первой записи в ADOTable2, т.е. первую запись таблицы "Таблица1".
В DBEdit'ах прописано Form1.DataSource3 - и там, повторюсь, первая запись. Если поменять на Form1.DataSource1, то все будет нормально.

Добавлено через 1 минуту

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

приходится самому узнавать, искать, изучать

И к этому набору добавьте, пожалуйста, внимать.

@neznayka · 11.06.2012, 21:23 **[ТС]**

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

внимать.

Разобрался, теперь отображается именно нужная запись.
Есть у меня к вам ещё парочка вопросов, т.к. не могу разобраться ещё в следующих вещах:
1) На форме 2, нажимая кнопку "Обновить", должны вноситься изменения в запись, но мне пишет "Ошибка синтаксиса в инструкции UPDATE" и указывает на строчку "ADOQuery1->Close();". Не могу понять, в чём я ошибся.
2) Выходит для ADOQuery DataSource отдельный не нужен?

The_Immortal · 11.06.2012, 21:55

neznayka,

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

2) Выходит для ADOQuery DataSource отдельный не нужен?

Если для вышеуказанного обновления, то не нужен.

Добавлено через 10 минут

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

1) На форме 2, нажимая кнопку "Обновить", должны вноситься изменения в запись, но мне пишет "Ошибка синтаксиса в инструкции UPDATE" и указывает на строчку "ADOQuery1->Close();". Не могу понять, в чём я ошибся.

А Вы все данные на обновление вводите?
И, кстати, у Вас таким запросом все записи будут изменяться, а не конкретная. Надо добавлять условие в конце, типа:

C++
1
ADOQuery1->SQL->Add("... WHERE Регистрационный_номер =" + Form1->DBGrid1->DataSource->DataSet->FieldByName("Регистрационный_номер")->AsString);

Добавлено через 10 минут
Хм... А теперь у меня к Вам вопросик. У вас DBEdit'ы на Форме2 подлежат редактированию?
А все, разобрался. Я пытался счетчик менять

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .	SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@neznayka 1 / 1 / 0 Регистрация: 13.05.2012 Сообщений: 48

	Перенос данных из одной формы на другую 11.06.2012, 17:18. Показов 4849. Ответов 44 Метки нет (Все метки) В программе есть DBGrid, который выводит данные из бд. По двойному клику по записи в столбце ФИО открывается форма с информацией о данном человеке, но выводится только информация о первой записи. Как сделать так, чтобы, нажав на запись в таблице, на форме отображалась соответствующая этой записи информация? Подскажите пожалуйста. 0

The_Immortal 1569 / 505 / 48 Регистрация: 04.04.2009 Сообщений: 1,891
	11.06.2012, 17:21
	neznayka, текущий обработчик двойного клика по записи в студию. 1

The_Immortal 1569 / 505 / 48 Регистрация: 04.04.2009 Сообщений: 1,891
	11.06.2012, 18:34
	neznayka, ну давайте тогда проект. Что-то не так сделали. 1

@neznayka 1 / 1 / 0 Регистрация: 13.05.2012 Сообщений: 48
	11.06.2012, 19:18 [ТС]
	Об этом я тоже хотел спросить, как не использовать второе соединение? а использовал его что бы отобразить данные на этой форме. 0

The_Immortal 1569 / 505 / 48 Регистрация: 04.04.2009 Сообщений: 1,891
	11.06.2012, 20:05
	neznayka, нам вообще ничего по этому не объясняли, так что это нормальная практика Разобрались? 1

@neznayka 1 / 1 / 0 Регистрация: 13.05.2012 Сообщений: 48
	11.06.2012, 20:12 [ТС]
	Пока что нет. Пытаюсь сделать одно соединение. 0

The_Immortal 1569 / 505 / 48 Регистрация: 04.04.2009 Сообщений: 1,891
	11.06.2012, 20:14
	neznayka, ну я вроде все доступно объяснил... Видимо, все-таки нет. Читайте ПМ тогда. 1