Форум на Исходниках.RU

Возникает ошибка не могу найти решение

DeZik — Thu, 04 Aug 2011 08:33:22 +0000

DeZik: Тему закрываю - читаем ка решилось - выше

Возникает ошибка не могу найти решение

DeZik — Thu, 04 Aug 2011 04:47:42 +0000

DeZik: В общем решение такое Лукапом нельзя пользоваться с Float'ом

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 16:39:22 +0000

DeZik: Только-что добил - это-же. Сейчас меняю форму получения цены из lookup в прямую - застра отпишусь что будет )))

Возникает ошибка не могу найти решение

Fr0sT — Wed, 03 Aug 2011 16:27:29 +0000

Fr0sT: В самом деле, глюк. Пока удалось обнаружить, что проблема в lookup поле CENA

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 15:09:36 +0000

DeZik: Вот без украшательств....
Попробуйте выполнить - убрал даже всю функциональность
ss.rar (, : 152)

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 10:30:09 +0000

DeZik:

Цитата Игорь Акопян @ 03.08.11, 10:23

Прямо на строке Insert?

Да

Цитата Fr0sT @ 03.08.11, 10:15

- выдает ошибку "Произошли ошибки во время выполнения многошаговой операции. Проверьте значения всех состояний."

Не, там все норально и никаких проблем с

Цитата Fr0sT @ 03.08.11, 10:27

Загуглил, это, судя по всему, у АДО такие заморочки

нет

Выложу без RZ завтра

Возникает ошибка не могу найти решение

Fr0sT — Wed, 03 Aug 2011 10:27:14 +0000

Fr0sT: Загуглил, это, судя по всему, у АДО такие заморочки

Возникает ошибка не могу найти решение

Игорь Акопян — Wed, 03 Aug 2011 10:23:41 +0000

Игорь Акопян:

Цитата DeZik @ 03.08.11, 04:58

При добавлении данных на стадии insert возникает ошибка.

стадия инсерт это не то что я спросил...
Прямо на строке Insert?

поддерживаю выкладку без РЗ :)

Возникает ошибка не могу найти решение

Fr0sT — Wed, 03 Aug 2011 10:15:09 +0000

Fr0sT:

Цитата DeZik @ 03.08.11, 08:10

отключи левые компонент паки - можешь запустить т.к. они за визуальность отвечают, а ее тма не надо.

Я про rz, на котором у тебя все лейблы

Цитата DeZik @ 03.08.11, 08:10

Это вырубка для теста

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

Цитата DeZik @ 03.08.11, 08:10

Как не странно следующий код работает

Edit после Insert ничего не делает, странно, что это работает...

Добавлено 03.08.11, 10:22
Хм. Попробовал базу Аксесс + Адоконнекшен + код

ADOTable1.Insert;
ADOTable1stat.AsString := 'blabla';
ADOTable1.Post;

- выдает ошибку "Произошли ошибки во время выполнения многошаговой операции. Проверьте значения всех состояний."

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 10:12:33 +0000

DeZik:

Цитата Игорь Акопян @ 03.08.11, 10:09

Поставьте брякпойнты везде, выясните в какой строке таки возникает ошибка.

Цитата DeZik @ 03.08.11, 04:58

При добавлении данных на стадии insert возникает ошибка.

Цитата Игорь Акопян @ 03.08.11, 10:09

Создайте пустые BeforePost и AfterPost. Это позволит более точно понять место ошибки

Все попробовал ничего не помогает, поэтому и обратился сюда

Возникает ошибка не могу найти решение

Игорь Акопян — Wed, 03 Aug 2011 10:09:20 +0000

Игорь Акопян: Поставьте брякпойнты везде, выясните в какой строке таки возникает ошибка. Происходит присваивание в поле, а датасет почему-то вышел или ещё не вошёл в режим редактирования.
Создайте пустые BeforePost и AfterPost. Это позволит более точно понять место ошибки

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 08:10:03 +0000

DeZik:

Цитата Fr0sT @ 03.08.11, 08:06

Ой, там "всей программы"-то - две с половиной строчки.

Это вырубка для теста.

Цитата Fr0sT @ 03.08.11, 08:06

Твой проект запустить нет возможности по причине юзания левых компонент-паков

отключи левые компонент паки - можешь запустить т.к. они за визуальность отвечают, а ее тма не надо.

Ib не ставил - однозадачна система. Еще раз акцентирую = нужно найти ошибку и решить проблему, а не переписать всю прогу с "0".

Добавлено 03.08.11, 08:51
Как не странно следующий код работает

try

dm2.ASKLAD_IN.Insert;

except

end;

try

dm2.ASKLAD_IN.Edit;

dm2.ASKLAD_INDATE.AsDateTime:=SKLAD_ADD.DateEdit1.Date;

dm2.ASKLAD_IN.Post;

except

end;

А дальше как не знаю....

Возникает ошибка не могу найти решение

Fr0sT — Wed, 03 Aug 2011 08:06:08 +0000

Fr0sT:

Цитата DeZik @ 03.08.11, 06:56

Точнее про что идет речь - не могу понять

Классы вида TDB

Цитата DeZik @ 03.08.11, 06:56

Интересует вопрос откуда проблема и как решить, а не как изменить всю программу для правильного функционирования данного модуля.

Ой, там "всей программы"-то - две с половиной строчки. Впрочем, дело хозяйское.
Почему у тебя не работает - не знаю. Попробовал у себя:

IBTable1.Insert;

IBTable1SUBJECT.AsString := 'blabla';

IBTable1.Post;

всё ОК. Твой проект запустить нет возможности по причине юзания левых компонент-паков

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 06:56:16 +0000

DeZik:

Цитата Fr0sT @ 03.08.11, 06:12

Есть ли весомая причина не юзать DB controls?

Точнее про что идет речь - не могу понять

Цитата Fr0sT @ 03.08.11, 06:12

Есть ли весомая причина добавлять все поля в дизайн-тайм и обращаться к ним как к объектам вместо dataset.FieldByName?

Да есть.

Поэтому и возникает вопрос. Интересует вопрос откуда проблема и как решить, а не как изменить всю программу для правильного функционирования данного модуля.

ПРИЧЕМ ДОБАВЛЮ.
После возникновения ошибки запись добавляется, но пустая....

Даже при конструкции

try

dm2.ASKLAD_IN.Insert;

dm2.ASKLAD_INDATE.AsDateTime:=SKLAD_ADD.DateEdit1.Date;

dm2.ASKLAD_INKOL.AsFloat:=SKLAD_ADD.CurrencyEdit1.Value;

dm2.ASKLAD_IN.Post;

except

messagebox(Sklad_add.Handle,'Запись не добавлена','Внимание',0);

end;

выводит сообщение об ошибке, а пустая запись добавляется. (в D7 ошибка та-же)

Возникает ошибка не могу найти решение

Fr0sT — Wed, 03 Aug 2011 06:12:13 +0000

Fr0sT: Есть ли весомая причина не юзать DB controls?
Есть ли весомая причина добавлять все поля в дизайн-тайм и обращаться к ним как к объектам вместо dataset.FieldByName?

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 05:40:54 +0000

DeZik: DataSet not edit or insert mode

Переключался между видами доступа - 0 эмоций

Возникает ошибка не могу найти решение

Bas — Wed, 03 Aug 2011 05:35:27 +0000

Bas: Ошибка какая?

Возникает ошибка не могу найти решение

DeZik — Wed, 03 Aug 2011 04:58:26 +0000

DeZik: При добавлении данных на стадии insert возникает ошибка.
Проект прилагаю
В SKLAD_ADD
начало модуля dm2.SKLAD_IN.insert

В проекте используется библиотека rz rx и ehlib
s.rar (, : 151)