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

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

Уроки 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 !!!



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

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

Bezuma 20 Сен 2012 в 00:00 #
Спс, простенько и со вкусом=)

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

Премного благодарен
tolik 27 Дек 2010 в 00:00 #
неработает.
надо создать Form2.
алгоритм надо доработать.

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