Create site free
При обращении клиента, к уже редактируемой записи другим клиентом, выдаётся сообщение - Записи - Базы данных в Delphi - Каталог статей - Mvi - развлечения
Перед началом обновления данных выполняете следующее.
1. При старте программы каждому юзеру раздаете уникальный ID.
2. Перед началом обновления данных записываете ID в поле в и коммитете данные. После этого поле будет залочено для этого юзера.
3. Вносите изменения.
4. В блокирующее поле записываете 0 и коммитете.
>
Среда, 08.02.2012, 14:47
Музыка, видео, игры - MVI
Главная | Каталог статей | Регистрация | Вход
Меню сайта
Категории каталога
ADO [15]
ASCII и CSV [12]
Access [19]
Alias [24]
BDE [37]
BLOB поля [19]
Clipper [2]
DB2 [2]
DBASE и DBF [26]
Fox Pro [1]
Interbase [21]
MSSQL [13]
ODBC [10]
Oracle [19]
Paradox [28]
SQL [30]
Sybase [1]
База данных [31]
Закладки [2]
Записи [19]
Индексы [10]
Компоненты и Базы данных [11]
Модуль данных [3]
Отчеты [3]
Ошибки БД [17]
Поиск [17]
Поля [36]
Сортировка и Фильтр [6]
Таблицы [39]
Мини-чат
Наш опрос
Оцените мой сайт
Всего ответов: 247
Главная » Статьи » Базы данных в Delphi » Записи

При обращении клиента, к уже редактируемой записи другим клиентом, выдаётся сообщение
Ответ 1:

Самое дешевое решение - завести поле, в которое будет записываться ID usera перед началом операции.

Перед началом обновления данных выполняете следующее.
1. При старте программы каждому юзеру раздаете уникальный ID.
2. Перед началом обновления данных записываете ID в поле в и коммитете данные. После этого поле будет залочено для этого юзера.
3. Вносите изменения.
4. В блокирующее поле записываете 0 и коммитете.

Перед началом обновления, проверяете чему равно значение блокирующего поля. Если оно не нулевое, то вы не только 
сможете сообщить, что запись заблокирована, но и сказать кем именно.

Если не делать ничего подобного то запросто при многопользовательской работе можно получить
deadlock на сервере а есть не очень хорошо.

Ответ 2:

Так сделать нельзя. Можно по другому. Оцени критические ситуации и поставь проверку на триггер или еще лучше сделай 
с помощью CHECK.
Например: колличество на складе не может быть меньше 0 CHECK TOVAR_COUNT>0
Если один из клиентов изменил количество , а второй попытался снять больше чем есть на складе - то сервер выдаст 
ошибку, которую ты можешь обработать программой.

Очень хорошая книга по этой теме П.В. Шумаков - Дельфи 3 и разработка приложений баз данных.
После ее прочтения 80% твоих вопросов будут решены.

Ответ 3:

Думаю, что Вашу задачу можно решить следующим путем.
На сервере метод, который осуществляет обработку данных.
"закрыть" критической секцией.

В начале критическую секцию необходимо объявить в составе класса или
отдельно:


SectionLock: TCriticalSection;

Затем:


procedure TForm1.FormCreate(Sender: TObject);
begin
SectionLock := TCriticalSection.Create;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
SectionLock.Free;
end;

Теперь при инициализации Вашего метода можно использовать SectionLock:


SectionLock.Acquire;
try
DoSomething;
finally
SectionLock.Release;
end;

// или

SectionLock.Enter;
try
DoSomething;
finally
SectionLock.Leave;
end;

Когда поток достигает критической секции, то все что заключено в этой секции перестает реагировать на любые внешние воздействия до момента выхода из критической секции. Теперь на попытку обращения к серверу другого клиента в качестве результата можно возвращать значение, которое будет идентифициороваться как "Занято". Например:


if Lock then
"Ответ - занято"

SectionLock.Enter;
try
Lock := True;
DoSomething;
finally
SectionLock.Leave;
Lock := False;
end;

P.S. Что бы сервер мог одновременно реагировать на несколько запросов, его необходимо реализовать в СОМ технологии.

Категория: Записи | Добавил: mvi (28.10.2008)
Просмотров: 167 | Рейтинг: 0.0/0 |
Всего комментариев: 0

При копировании материалов данного сайта, ссылка на него обязательна!

Имя *:
Email:
Код *:
Форма входа
E-mail:
Пароль:
Поиск
Друзья сайта
Анекдоты
Реклама
Статистика


Рейтинг@Mail.ru

Онлайн всего: 1
Гостей: 1
Пользователей: 0
Copyright MyCorp © 2012 Хостинг от uCoz