Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 08.04.2008, 18:17
Кодер Кодер вне форума
Активный
 
Регистрация: 25.02.2008
Сообщения: 395
Репутация: -599
По умолчанию Данные БД

Уважаемые,

Как мне :
1)Взять значение третьего поля и 5 строки из БД(data.mdb)
2)Как записать туда же данные
Ответить с цитированием
  #2  
Старый 08.04.2008, 18:21
xchrom xchrom вне форума
Начинающий
 
Регистрация: 08.04.2008
Сообщения: 177
Репутация: 15
По умолчанию

//Что-то типа того, лень проверять

ADOTable.First; // на начало
for i:=0 to 4 do ADOTable.Next; //до 5 строки
Res := ADOTable.Fields[2].Value; //берем значение
ADOTable.Edit;//в редактирование
ADOTable.Fields[2].Value := Res+1; // пишем что-то
ADOTable.Post;//подтвердим
Ответить с цитированием
  #3  
Старый 08.04.2008, 19:42
MegaPiha MegaPiha вне форума
Активный
 
Регистрация: 24.03.2008
Сообщения: 227
Версия Delphi: Delphi 7
Репутация: 30
По умолчанию

Цитата:
Сообщение от xchrom
Код:
 
ADOTable.First; // на начало
for i:=0 to 4 do ADOTable.Next; //до 5 строки

Лучше так.
Код:
ADOTable.RecNo:=5;

или так.
Код:
ADOTable.First;
ADOTable.MoveBy(4);
Ответить с цитированием
  #4  
Старый 09.04.2008, 09:12
Аватар для Yurk@
Yurk@ Yurk@ вне форума
Специалист
 
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
Восклицание

Цитата:
Сообщение от Неподарок
1)Взять значение третьего поля и 5 строки из БД(data.mdb)
Код:
Table1.RecNo:=5; //указываем строку
Edit1.Text:=Table1.Fields[2].Value;

Цитата:
2)Как записать туда же данные
Код:
Table1.RecNo:=5; //указываем строку
Table1.Edit;     //переходим в режим редактироывания
Table1.Fields[2].Value:=Edit1.Text;  //в указанный столбец пишем данные
Table1.Post;     //сохраняем данные
__________________
Поживу - увижу, Доживу - узнаю, Выживу - учту.
[P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
Ответить с цитированием
  #5  
Старый 09.04.2008, 09:29
Кодер Кодер вне форума
Активный
 
Регистрация: 25.02.2008
Сообщения: 395
Репутация: -599
По умолчанию

Спасибо, теперь буду знать
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 21:38.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter