ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TDbf: cannot modify a read-only dataset
10 сообщений из 10, страница 1 из 1
TDbf: cannot modify a read-only dataset
    #39417457
Megadragon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Megadragon
Гость
Есть программа для оптимизации рутины, а именно выборки данных из Оракловой базы и сохранения их в DBF-файл. Написана она в Delphi 2010 с использованием компонентов ODAC v9.3.8 (используются лишь TOraSession и TOraQuery) и TDbf v7.0.1. Запуск программы осуществляется посредством подключения по RDP к серверу приложений на базе Windows Server 2008 R2, причём каждый юзер подключается под своей учёткой. Одни юзеры нормально получают DBF'ники, тогда как у других каждый вызов Dbf1.Append вызывает ошибку (см. название темы). Забавное совпадение: ошибка вылазит только у юзеров, подключающихся с компа с Windows 10.
Запись в DBF'ник происходит незаурядным способом:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
OraQuery1.Open;
OraQuery1.FetchAll := True;
OraQuery1.First;
Dbf1.TableName := 'D:\filepath\filename.dbf'; // имя файла сокращено в целях демонстрации
Dbf1.CreateTable;
Dbf1.Open;
while not OraQuery1.Eof do begin
  Dbf1.Append; // именно здесь вылазит ошибка (см. название темы)
  for I := 0 to Dbf1.FieldCount - 1 do // I – локальная Integer-переменная, поля согласованы заранее в design-time
    Dbf1.Field[I] := OraQuery1.Field[I]; // допускается (и работает) св-во по умолчанию AsVariant
  Dbf1.Post;
  OraQuery1.Next;
end;
Dbf1.Close;
OraQuery1.Close;


Скажу сразу, что свойства TDbf ReadOnly и Exclusive были сразу сброшены в False через Object Inspector, и программа к ним нигде и никак не обращается. Уже пробовали в начале while'а, сразу перед Append'ом вставлять
Код: pascal
1.
Assert(not Dbf1.ReadOnly and not Dbf1.Exclusive, '!!!');


Ни разу ни у кого он не сработал, даже у «Десяточников», у которых ошибка вылезла.
Где здесь собака м.б. зарыта: в настройках учёток на сервере приложений, в Win10 на компах юзеров или ещё где-нибудь?
...
Рейтинг: 0 / 0
11.03.2017, 23:31:34
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39417480
чччД
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чччД
Участник
Megadragon,

чета сбойнуло. Удали все таблички и пересоздай их заново.
...
Рейтинг: 0 / 0
12.03.2017, 00:24:04
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39417483
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Трассировка невозможна?

Может быть это просто проблема с доступом к файлу.
...
Рейтинг: 0 / 0
12.03.2017, 00:26:37
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39417487
чччД
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чччД
Участник
rgreat,

с TDbf обычное дело. Лечится обычно пересозданием файьлв с табличками, если разбираться лень.
...
Рейтинг: 0 / 0
12.03.2017, 00:44:51
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39417496
Megadragon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Megadragon
Гость
rgreatТрассировка невозможна?
В том-то и дело, что «в боевых условиях», то бишь на сервере приложений, невозможна. А разрабатывается прога на локальном компе с Win7, на котором, естественно, данной проблемы не возникает.

rgreatМожет быть это просто проблема с доступом к файлу.
Смотрели права доступа к папке и к создаваемым файлам – все одинаковые.

чччДУдали все таблички и пересоздай их заново.
Таблички в смысле TDbf-компоненты или файлы на диске? Если файлы, то они и так создаются во время вызова Dbf1.CreateTable.
...
Рейтинг: 0 / 0
12.03.2017, 01:12:33
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39417506
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
MegadragonrgreatТрассировка невозможна?
В том-то и дело, что «в боевых условиях», то бишь на сервере приложений, невозможна. А разрабатывается прога на локальном компе с Win7, на котором, естественно, данной проблемы не возникает.Удаленную отладку не предлогать?
...
Рейтинг: 0 / 0
12.03.2017, 01:57:28
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39417636
Megadragon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Megadragon
Гость
rgreatMegadragonпропущено...

В том-то и дело, что «в боевых условиях», то бишь на сервере приложений, невозможна. А разрабатывается прога на локальном компе с Win7, на котором, естественно, данной проблемы не возникает.Удаленную отладку не предлогать?
Идея хорошая. Не подскажете, как её делать по RDP?
...
Рейтинг: 0 / 0
12.03.2017, 17:44:59
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39417662
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
http://docwiki.embarcadero.com/RADStudio/Seattle/en/Overview_of_Remote_Debugging
...
Рейтинг: 0 / 0
12.03.2017, 19:24:45
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39499791
UserGate
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
UserGate
Участник
Megadragon,

Доброго времени суток!
Помог Fix in DBF.pas

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
function TDbf.GetCanModify: Boolean; {override;}
begin
if FReadOnly or (csDesigning in ComponentState) then
Result := false
else
//Result := FTranslationMode > tmNoneAvailable; // "faulty" line which I commented out
Result := True;
end;




Описано здесь https://sourceforge.net/p/tdbf/discussion/107245/thread/c0de08c9/
...
Рейтинг: 0 / 0
03.08.2017, 16:33:49
| Ответить | Цитировать | Написать  
TDbf: cannot modify a read-only dataset
    #39502041
Arioch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Arioch
Участник
скорее всего кодировку или не распознало или не смогло найти соотв. таблицу
...
Рейтинг: 0 / 0
08.08.2017, 18:11:08
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TDbf: cannot modify a read-only dataset
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&fpage=135&tid=2041954]:
 0ms
get settings:
 5ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 51ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 45ms
get tp. blocked users:
 1ms
others: 197ms
total:  331ms
созд. / загр.: 331ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]