Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Поиск по БД

Автор: Гость_Sergey89 27.11.2004, 18:44

БД- Paradox7
Запрос такой:

Код


var
  dat: string;
begin
  dat:= InputBox('Ïîèñê ïî äàòå íàçíà÷åíèÿ',
                  'Ââåäèòå äàòó è íàæìèòå OK', '');
  if dat<> '' then
  begin
    with Form1.Query1 do begin
      Close;
      SQL.Clear;

      SQL.Add('SELECT Data, Name, Work type, Note');
      SQL.Add('FROM ":Table1:work.db"');
      SQL.Add('WHERE');
      SQL.Add('(Data="'+ dat +'")');
      SQL.Add('ORDER BY Data');
      Open;
    end;

    if Query1.RecordCount<>0 then
      DataSource1.DataSet:= Query1
    else begin
      ShowMessage('Â áàçå äàííûõ íåò òàêîé çàïèñè');
      DataSource1.DataSet:= Table1;
    end;
  end;

Вот такая ошибка

[b]Invalid use of keyword
Token: Work
Line number: 1

В чём ошибка

Автор: Segey89 27.11.2004, 19:09

С этим разобрался, теперь новая ошибка Circular Datalinks are not allowed

Автор: Sleepy_PIP 27.11.2004, 19:36

Цитата(Segey89 @ 27.11.2004, 19:09)

С этим разобрался, теперь новая ошибка Circular Datalinks are not allowed

в каком месте?
не смотрит у тебя случаем Query1 на DataSource1 ?

Автор: Гость_Sergey89 27.11.2004, 20:27

Sleepy PIP, спасибо в этом и была ошибка!

Автор: Sleepy_PIP 27.11.2004, 21:20

Цитата

Sleepy PIP, спасибо в этом и была ошибка!

я не советую тебе использовать Query для работы с flat tables - используй TTable с соотв. индексами - будет гораздо быстрее.

Автор: Vit 27.11.2004, 21:39

Цитата(Sleepy_PIP @ 27.11.2004, 12:20)

Зато переносимость кода лучше

Автор: Sleepy_PIP 27.11.2004, 21:59

Цитата(Vit @ 27.11.2004, 21:39)

Цитата(Sleepy_PIP @ 27.11.2004, 12:20)

Зато переносимость кода лучше

куда , блин? все под win32 - парадокса под другими платформами нет. от задачи к задаче - какая нафиг переносимость если TQuery работает на поряок медленнее выборки по TTable? ... о чем ты?

Автор: Vit 28.11.2004, 00:51

Цитата(Sleepy_PIP @ 27.11.2004, 12:59)

куда , блин?

На любой клиент сервер

Автор: Sleepy_PIP 28.11.2004, 15:13

Цитата(Vit @ 28.11.2004, 00:51)

Цитата(Sleepy_PIP @ 27.11.2004, 12:59)

куда , блин?

На любой клиент сервер

ну тогда гораздо проще взять сразу FB и не морочиться по поводу парадокса.
Если цель - действиетльно что-то искать в парадоксе, это одно. Если скорость поиска не важна, а важна переносимость - еще раз - лучше сразу работать с FB(IB/YA).

Автор: Akella 30.12.2004, 16:49

Цитата

за обеими руками и сам использую SQL+Paradox только в редких случаях