Модераторы: skyboy
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Invalid use of keyword. Token:from, Выполняю запрос в Delphi 
:(
    Опции темы
2war
Дата 23.1.2009, 05:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 23.1.2009

Репутация: нет
Всего: нет



Код


unit Unit1;


interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, DB, DBTables, Grids, DBGrids;

type
  TForm1 = class(TForm)
    DBGrid1: TDBGrid;
    Query1: TQuery;
    DataSource1: TDataSource;
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.Title:='База';
DataSource1.DataSet:=Query1;
DBGrid1.DataSource:=DataSource1;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 Query1.Close;
 Query1.SQL.Clear;
 Query1.SQL.Add('Select from kurs_predm.db');
 Query1.Open;
    Query1.FieldByName('Name').DisplayLabel:='наименование';
    Query1.FieldByName('Prepod').DisplayLabel:='Преподаватель';
    Query1.FieldByName('WeekDay').DisplayLabel:='День недели';
    Query1.FieldByName('DisTime').DisplayLabel:='Время';
end;



end.


Выводит ошибку: Project Project1.exe raised exception class EDBEngineError with message 'Invalid use of keyword.
Token:from
Line Number:1'. Process stopped. Use Step or Run to continue.

PM MAIL   Вверх
ТоляМБА
Дата 23.1.2009, 07:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Котэ
***


Профиль
Группа: Завсегдатай
Сообщений: 1606
Регистрация: 15.12.2004
Где: Трансильвания

Репутация: 4
Всего: 252



Закомменти эти строки:
Цитата(2war @  23.1.2009,  07:11 Найти цитируемый пост)
DataSource1.DataSet:=Query1;
DBGrid1.DataSource:=DataSource1;


В DRKB почитай статью "Рождение, жизнь и гибель формы" и обрати внимание когда при запуске программы выполняется процедура
Цитата(2war @  23.1.2009,  07:11 Найти цитируемый пост)
FormCreate



МОДЕРАТОРЫ: Перенесите, плиз, тему в Делфи.
PM   Вверх
skyboy
Дата 23.1.2009, 09:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


неОпытный
****


Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: 15
Всего: 260



Цитата(ТоляМБА @  23.1.2009,  06:54 Найти цитируемый пост)
Закомменти эти строки:

а чего у него не так? установка свойств происходит уже после создания формы, все нормально, да.
2war, зря привел полный код на Delphi, а не  только код запроса. на саммо деле,как тебе и "говорит Delphi", запрос 
Цитата(2war @  23.1.2009,  04:11 Найти цитируемый пост)
Select from kurs_predm.db

не корректен. потому что после Select должно идти перечисление полей, которые надо выбрать, или "*" для выбора всех имеющихся  полей. А у тебя этого нет.
PM MAIL   Вверх
ТоляМБА
Дата 23.1.2009, 09:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Котэ
***


Профиль
Группа: Завсегдатай
Сообщений: 1606
Регистрация: 15.12.2004
Где: Трансильвания

Репутация: 4
Всего: 252



Цитата(skyboy @  23.1.2009,  11:24 Найти цитируемый пост)
а чего у него не так?
Не вели казнить!
Просто Делфю больше года не юзал, думал что ругается из-за того что объект Query1 ещё не создан. smile
PM   Вверх
Deniel_li
Дата 23.1.2009, 19:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 52
Регистрация: 6.12.2007

Репутация: нет
Всего: 1



Query1.SQL.Add('Select * from kurs_predm.db');
PM MAIL   Вверх
Google
  Дата 4.4.2020, 18:14 (ссылка)  





  Вверх
  
Ответ в темуСоздание новой темы Создание опроса
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Составление SQL-запросов | Следующая тема »


 




[ Время генерации скрипта: 0.1326 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.