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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 10.02.2011, 10:44   #1
Chaos_21
Новичок
Джуниор
 
Регистрация: 10.02.2011
Сообщений: 2
По умолчанию База данных SQL&Delphi 5

Помагите плиз.
Нужно создать базу данных из 4х таблиц с данными(Товар, Поставка, Фирма, Реестр) и 5й таблицей(Результат)
Все создал, создал формы для каждой таблице.И стопарнулся на конопке "Результат"-В каждой форме таблице у меня в компоненте TTable -cвой номер

Вот код-
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.Active:=True;
Query1.Open;
try
While not Query1.Eof do Begin
Table5.Insert;
Table5.FieldByname("Tip").AsInteger:=Query1.FieldByname("Tip").AsInteger;
table5.fieldbyname("summa").asinteger:query1.fieldbyname("kol").asinteger;
table5.fieldbyname("Dat").asstring:=Query1.fieldbyname("Dat").asstring;
table5.fieldbyname("tovar").asstring:=Query1.fieldbyname("tovar")asstring;
table5.fieldbyname("firma").asstring:=Query1.fieldbyname("firma")asstring;
Query1.Next;
end;
except
on EDataBaseError do ShowMassage ("Proverte Dannie);
end;
Query2.Active:=True;
Query2.Open;
Edit1.Text:=query2.fieldByTovar("VSEGO").AsString;
end;
а вот ошибки которые он выдает при компиляции-
[Error] Unit1.pas(42): Undeclared identifier: 'Table5'
[Error] Unit1.pas(42): '(' expected but ';' found
[Error] Unit1.pas(43): Incompatible types
[Error] Unit1.pas(43): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(43): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(44): Missing operator or semicolon
[Error] Unit1.pas(44): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(44): ':=' expected but ':' found
[Error] Unit1.pas(44): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(45): Missing operator or semicolon
[Error] Unit1.pas(45): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(45): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(46): Missing operator or semicolon
[Error] Unit1.pas(46): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(46): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(47): Missing operator or semicolon
[Error] Unit1.pas(47): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(47): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(51): Undeclared identifier: 'ShowMassage'
[Error] Unit1.pas(51): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(51): Illegal character in input file: 'д' ($E4)
[Error] Unit1.pas(55): Undeclared identifier: 'fieldByTovar'
[Error] Unit1.pas(55): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(58): Declaration expected but end of file found
[Fatal Error] Project1.dpr(6): Could not compile used unit 'Unit1.pas'

Ошибки я понял но я не понял где мне их устранить


___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

Последний раз редактировалось Serge_Bliznykov; 10.02.2011 в 11:25.
Chaos_21 вне форума Ответить с цитированием
Старый 10.02.2011, 11:09   #2
_SERGEYX_
Участник клуба
 
Аватар для _SERGEYX_
 
Регистрация: 07.07.2007
Сообщений: 1,518
По умолчанию

да, вообще, какую-то чепуху ты написал...
1.
Цитата:
Undeclared identifier: 'Table5'.
Если нет таблицы Table5, то зачем пытаться что-то писать в нее?
2.
Цитата:
table5.fieldbyname("summa").asinteg er:query1.fieldbyname("kol").asinte ger;
Где знак равенства после двоеточия?
3. Строки пишутся в одиночных кавычках а не двойных.
4.
Цитата:
Query2.Active:=True;
Query2.Open;
Это одно и тоже.
5. table5.post отсутствует в цикле.
.... дальше не смотрел... смысла нет.
_SERGEYX_ вне форума Ответить с цитированием
Старый 10.02.2011, 11:11   #3
Chaos_21
Новичок
Джуниор
 
Регистрация: 10.02.2011
Сообщений: 2
По умолчанию

я писал все как в методичке, это у меня курсовая, может там ошибки в самой методички тогда
Chaos_21 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
База Данных Delphi и Paradox 7 не работает запрос sql DJ DIMON БД в Delphi 4 09.12.2010 12:07
слитела база данных SQL оплачу karnelli SQL, базы данных 0 03.11.2010 00:56
База данных. ADOQuery SQL Zohei Помощь студентам 2 01.05.2010 15:28
база данных SQL motaro SQL, базы данных 0 05.02.2010 23:20
база данных на языке SQL(ORACLE) j_Q SQL, базы данных 1 24.01.2009 23:02