@NEO5

Уважаемые программисты возник небольшой вопрос по поводу редактирования, изменения, обновления, удаления и т.д. записей в базе данных.

Работа ведётся только с одной таблицей, в которой храниться сведения о работниках: ФИО, Адрес, Телефон, Отдел, Дом, Квартира.

Записи добавляются в таблицу с помощью DBNavigator. Таблица создана на Paradox 7 входящий в C++ Builder 5. Записи невозможно трогать при создании индекса. Говорит, что индекс только для чтения! А всё остальное работает прекрасно.

Помогите пожалуйста!

0

@NEO5

Кто-нибудь?????????????????????77

0

@man_of_ring

скажи что тебе надо то ?
TTable *tab;
// устанавливаем на первыую запись
tab->First();
// while(!tab.eof())
{
// рендактируем
tab->Edit();
tab->FieldByname('FAMILY').AsString='ПУПКИН';
tab->FieldByname('NAME').AsString='ВАСИЛИЙ';
tab->FieldByname('SURNAME').AsString='ИВАНОВИЧ';
tab->FieldByname('BIRDDATE').AsString='10.10.1975';
tab->FieldByname('SRTEET').AsString='КАЛИНИНА';
tab->FieldByname('DOM').AsInteger=10;
tab->FieldByname('KB').AsInteger=1;
// перехоим на след. запись
tab->Next();
tab->Post(); // сохраняем записи
}
теперь все записи БД содержат Пупкин Василий Иванович и тд

добавление новой записи так
TTable *tab;
tab->Insert(); // добавляем
tab->FieldByname('FAMILY').AsString='Петров';
tab->FieldByname('NAME').AsString='Петр';
tab->FieldByname('SURNAME').AsString='Петрович';
tab->FieldByname('BIRDDATE').AsString='01.12.1980';
tab->FieldByname('SRTEET').AsString='Циолковского';
tab->FieldByname('DOM').AsInteger=1;
tab->FieldByname('KB').AsInteger=11;
tab->Post();

че то еше не ясно...
читай хэлп по Ф1 и .... учи англицкий если еще не выучил

удачи.

0

@man_of_ring

да насчет удаления...
НО запомни !!! (пауза на 3 секунды....) и не говори что я тебя не предупреждал...
ПРЕДУПРЕЖДЕНИЕ
1. прежде чем ковыпяться в ОЧЕНЬ важной (или не ОЧЕНЬ важной пока...пока...а потом вдруг очень важной базе... сделай копию...на всякий ПЭ, а случаи разщные бывают, поверь мне..одному из тех кто лили слезы...и сидел ночами на работе..восстанавливая..данные случайно удаленные с винта..размеченном НТФС, делай копии и делай их больше..завтра когда придешь можешь удалить..а можешь не удалять неделю.. но все должно работать)
2. сначала подусай че те надо...если база большая это займет время..а может и не займет вовсе..
3. тренируйся на копии... пока не отрабоатешь все досканально.

И последенне подними Бэкап сервер, посатвь Бэкап прогу...
напиши батник архиватор-бэкапер, и всегда спи спокойно

))

ну так вот
tab->Edit();
tab->delete(); //удаляем
tab->Post(); // после этого уже трудно восстанвовить данные..

ну в ДБФ мона, в класрионе мона..
ну вощем пока не сделал сжатие БД
потерянные записи еще лежат, но они уже полмченные как удаленные

0

@man_of_ring

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

0

@NEO5

Поиск по базе осуществляется прекрасно после создания вторичного индекса. Но добавления хотелось бы производить с помощью компонента DBNavigator и DBGrid. Но при этом выводит сообщение, что созданный индекс только для чтения. Как быть?

0