Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.06.2008, 14:11   #1
aesoem
Форумчанин
 
Регистрация: 24.12.2007
Сообщений: 288
По умолчанию is not a valiad integer value

Здравствуйте, проблема в следующем:
На форме есть DBGrid1 в нем 4 поля (1-наименование, 2-кол-во,3-цена,4-итог) програма должна перемножить значение цены на кол-во товара и присвоить значение в поле итог, я делаю так...
Код:
ADOTable1Field.Value:=ADOTable1DSDesigner4.AsInteger*ADOTable1DSDesigner3.AsInteger;
Все работает только если в любом поле DBGrid1 изменить какое либо значение а если нажать так то вываливается ошибка:
is not a valiad integer value.
aesoem вне форума Ответить с цитированием
Старый 28.06.2008, 14:46   #2
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Для этого вычисляемые поля есть. В OnCalcFields пишешь свое Вычисляемое поле = ADOTable1DSDesigner4.AsInteger*ADOT able1DSDesigner3.AsInteger;

А вычисляемое поле создаешь по даблклику по своему ADOTable.
Баламут вне форума Ответить с цитированием
Старый 28.06.2008, 16:00   #3
aesoem
Форумчанин
 
Регистрация: 24.12.2007
Сообщений: 288
По умолчанию

я знаю про это событие если я пропишу код там то вылитает эта же ошибка и ещё становится невозможным работать с программой так-как эта процедура вызывается и в 1 раз!
aesoem вне форума Ответить с цитированием
Старый 29.06.2008, 14:08   #4
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Приложи файлик с исходником к посту. Что-то так я не могу понять в чем собственно проблема.
Баламут вне форума Ответить с цитированием
Старый 29.06.2008, 14:23   #5
aesoem
Форумчанин
 
Регистрация: 24.12.2007
Сообщений: 288
По умолчанию

Вот, скопируй базу из архива в корень диска C:\.

Теперь запускай и нажми на кнопку "ИТОГ" - будет ошибка!
Закрой и сного запусти программу измени любое значение в сетке (Хоть наименование) и нажми итог - все работает!!!
Вложения
Тип файла: zip БД.zip (17.9 Кб, 11 просмотров)
aesoem вне форума Ответить с цитированием
Старый 29.06.2008, 14:32   #6
_Engine_
Форумчанин
 
Регистрация: 29.06.2008
Сообщений: 603
По умолчанию

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOTable1.Edit;
ADOTable1Field.Value:= ADOTable1DSDesigner4.AsInteger*ADOT able1DSDesigner3.AsInteger;
ADOTable1.Post;
end;
_Engine_ вне форума Ответить с цитированием
Старый 29.06.2008, 14:37   #7
aesoem
Форумчанин
 
Регистрация: 24.12.2007
Сообщений: 288
По умолчанию

_Engine_
Спасиба, заработала!
aesoem вне форума Ответить с цитированием
Старый 29.06.2008, 14:44   #8
aesoem
Форумчанин
 
Регистрация: 24.12.2007
Сообщений: 288
По умолчанию

а как переводится на русский

ADOTable1.Edit;
aesoem вне форума Ответить с цитированием
Старый 30.06.2008, 01:39   #9
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Цитата:
Сообщение от aesoem Посмотреть сообщение
а как переводится на русский

ADOTable1.Edit;
Переводим набор данных в режим редактирования.
Баламут вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Из string в integer MAKEDON Помощь студентам 9 29.07.2008 15:38
Записать в Integer Михаил Юрьевич Общие вопросы Delphi 3 04.07.2008 17:11
integer, for, if в Pascal boom99 Помощь студентам 3 12.11.2007 16:25
String и Integer bek@rt Общие вопросы Delphi 10 18.05.2007 19:02
Конвертация real > integer Viteef Общие вопросы Delphi 2 03.05.2007 18:45