Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.02.2013, 11:39   #1
Ol'K@
Пользователь
 
Аватар для Ol'K@
 
Регистрация: 26.08.2011
Сообщений: 12
По умолчанию Редактирование поля в DBGrid.

Помогите пожалуйста. Нужно чтобы из DBGrid выбиралась строка и от туда заносились значения в Edit, а потом она редактировалась.
Код редактирования представлен ниже.

Код:
 begin
       if MessageDlg ('Редактировать запись?',
         mtConfirmation, [mbYes, mbNo], 0) <> mrNo then
           begin
            ADOTable1.Edit;
            ADOTable1.FieldByName('фамилия').AsString:=Edit4.Text;
            ADOTable1.FieldByName('Имя').AsString:=Edit5.Text;
            ADOTable1.FieldByName('Отчество').AsString:=Edit6.Text;
            ADOTable1.FieldByName('Оценка за год').Value:=StrToInt(Edit9.Text);
            ADOTable1.Post;
           end
       else Abort;
     end
else MessageDlg ('Не все поля заполнены!', mtConfirmation, [mbYes], 0)
end;
Ptichka

Последний раз редактировалось Stilet; 03.02.2013 в 12:04.
Ol'K@ вне форума Ответить с цитированием
Старый 03.02.2013, 12:05   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Ну в целом все верно.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.02.2013, 12:36   #3
Ol'K@
Пользователь
 
Аватар для Ol'K@
 
Регистрация: 26.08.2011
Сообщений: 12
По умолчанию

Как правильно записать этот код (он выбирает строку из DBGrid).
Чтобы сначала можно было выбрать строку в DBGrid после она занеслась в edit, а потом уже ее можно редактировать.

Edit4.Text := ADOTable1.FieldByName('Фамилия').As String;
Edit5.Text := ADOTable1.FieldByName('Имя').AsStri ng;
Edit6.Text := ADOTable1.FieldByName('Отчество').A sString;
Edit9.Text := ADOTable1.FieldByName('Оценка за год').AsString;
Ptichka
Ol'K@ вне форума Ответить с цитированием
Старый 03.02.2013, 12:47   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Тогда другой вопрос: Кто выбирает строку? По какому критерию?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.02.2013, 13:05   #5
Ol'K@
Пользователь
 
Аватар для Ol'K@
 
Регистрация: 26.08.2011
Сообщений: 12
По умолчанию

Вот посмотрите в архиве.
Вложения
Тип файла: rar olya.rar (23.5 Кб, 16 просмотров)
Ptichka
Ol'K@ вне форума Ответить с цитированием
Старый 03.02.2013, 13:42   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

И что я там должен увидеть? Ты поняла мой вопрос?
Кто выбирает строку? Человек мышкой или клавиатурой или компьютер? По какому признаку выбирается строка?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.02.2013, 13:52   #7
Ol'K@
Пользователь
 
Аватар для Ol'K@
 
Регистрация: 26.08.2011
Сообщений: 12
По умолчанию

Человек мышкой.
Ptichka
Ol'K@ вне форума Ответить с цитированием
Старый 03.02.2013, 14:52   #8
Yurk@
Участник клуба
 
Аватар для Yurk@
 
Регистрация: 19.12.2007
Сообщений: 1,100
По умолчанию

думаю что как-то так
Вложения
Тип файла: rar olya.rar (24.3 Кб, 58 просмотров)
На форуме: Помогаю за спасибо
ICQ\Skype: Это моё личное время ...
Yurk@ вне форума Ответить с цитированием
Старый 03.02.2013, 15:18   #9
Ol'K@
Пользователь
 
Аватар для Ol'K@
 
Регистрация: 26.08.2011
Сообщений: 12
По умолчанию

Спасибо большое Yurk@. Ты один из не многих кто может реально помочь!
Ptichka
Ol'K@ вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Редактирование текущей записи Dbgrid -=pasha=- Общие вопросы Delphi 9 19.02.2013 03:16
Редактирование и сохранение excel из dbgrid Q012 БД в Delphi 5 22.08.2012 21:24
Как программно запретить редактирование ячейки в DBGrid kraw2 Компоненты Delphi 8 25.11.2010 21:16
редактирование поля Boolean Dimka_89 БД в Delphi 8 20.10.2010 12:01
Запретить редактирование в DBGrid MixanMM БД в Delphi 12 10.05.2010 20:28