Уроки Delphi: DBGrid передать все значения в строке в другую форму

Опубиковано: 14.08.2008 г., автор: , просмотров: 62226

Уроки Delphi: Dbgrid передаем строку в другую форму.

Всем привет ! Сегодня я расскажу вам как в компоненте DBGrid выделить сразу всю строку и при двойном клике передать все значения полей в строке в другую форму.

Начну как всегда с небольшого вступления. Итак если кто не знает DBGrid это компонент расположенный на закладке Data Controls. Служит он в первую очеред для работы с базой данных, а именно позволяет отображать в программе некую таблицу в заранее созданую вами в базе данных.

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

Открываем Delphi создаем новый проект и после ключевого слова private
пишем вот такую строчку:

function dbstring:string;

Нажимаем сочетание клавиш CTRL+SHIFT+C , delphi автоматически сгенерирует шаблон нашей будующей функции. Посмотрите как сделанно у меня и дополните не достающие строки.

function dbstring:string;
var
i:integer;
begin
result:='';
for i:=0 to DBGrid1.DataSource.DataSet.FieldCount-1 do
result:=result+DBGrid.DataSource.DataSet.Fields[i].AsString+';';
end;

Применить функцию можно например при щелчке мыши на каком нибудь поле таблицы.

На этом все удачной вам компиляции.

P.S. Не забываем подписываться на бесплатную мультимедийную рассылку.
Форма для подписки расположена с права и с лева.

До встречи DelphiExpert.ru !!!



Похожие материалы

Последние из рубрики

Александр 15 Mar 2018 в 15:21 #
Здравствуйте!Подскажите как сделать функцию обработки по нажатию правой кнопки мыши чтоб открывалось меню как в win (отправить ...to) и там выбираем куда на рабочий стол или флеш,мне нужно чтоб при нажатии мышки он открывал меню,в нем я выбирал отправить на флешку и он считая свои данные из DBGrid таблицы искал их в указанном каталоге и если имеется такой отправлял по выбору направления,если отсутствует то сообщение о том что файл отсутствует...!?Помогите реализовать этот метод....
Bezuma 20 Sep 2012 в 00:00 #
Спс, простенько и со вкусом=)

Цитата:
"Коментарий добавил(а): Пиздец Дата: 2010-12-16 0
Автор уебак полный! То что написал никак не открывает другую форму. DBGrid: procedure TForm1.DBGrid1DblClick(Sender: TObject); begin label1.Caption:=dbstring(); end; вы тупые блять, ты тему читал "....все значения в строке в другую форму" ну и кто из вас сделал это? автор отсоси сам у себя"
Неудачник))) Сам суть темы передать данные всей строки, а уж куда - это уже на сколько фантазии хватит. Лично я продолжаю практиковать эти примеры и накладывать один на другой. Экспортировал данные с Excel в DBGridEh(было в предыдущих уроках) и вывел данные в Edit. Эксперементируй и думай головой;)
STAMAT 16 Mar 2012 в 00:00 #
Спасибо за идею.
Но у меня к Вам свой вопрос по DBGrid.
Мне "мешает" колесо мыши. Когда DBGrid в фокусе с данными и вращать колесо мыши, идет последовательная вертикальная переисовка ячеек, а номер записи не меняется и все сбивается! Помогите!
Денис 29 Apr 2011 в 00:00 #
Спасибо)) Очень полезная вещь! Жаль я увидел так поздно... Мне в курсовой это было бы как раз кстати)))
Георгий 08 Jan 2011 в 00:00 #
Уважаемый автор, а как же сделать так чтобы все тоже самое происходило не с выделенной строкой, а например, с пятой, даже если выделена шестая?

Премного благодарен

ОтменитьДобавить комментарий