![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Table1: No index currently active
nurlan_1 © (2006-12-10 16:20:00)пользуюсь базой BDE. когда сама база находится в папке DBDemos никаких проблем нет, но когда я ссылку на каталог программы направляю ( копия базы там есть), тогда вот вылетает ощибка
Table1: No index currently active
как можно исправить эту ощибку?
nurlan12 (2006-12-12 02:22:00) [1]Anatoly Podgoretsky
уважаемый я имел ввиду вот это http://www.iqtisadiyyat.com/trifles/q.jpg
думаю, когда я создаю эту базу, тогда и допускаю ошибку.
Германн
я не сказал что ишу все файлы с расширением *.db. просто люди говорят что, рядом с моей базой должно быть и другие файлы, как я понел с другими расщирениями.
вот код программы
procedure TForm1.Button1Click(Sender: TObject);
begin
SerChar:= ' ';
tnum:=1;
T:= Richedit1.Lines.Text;
word:= Trim(T)+SerChar;
word:= AnsiLowerCase(word);
word := StringReplace(word, '.', ' . ',[rfReplaceAll]);
word := StringReplace(word, ',', ' , ',[rfReplaceAll]);
word := StringReplace(word, '?', ' ? ',[rfReplaceAll]);
word := StringReplace(word, '!', ' ! ',[rfReplaceAll]);
strlen:= Length(word);
While Pos(SerChar,word) > 1 Do Begin
x:= Pos(SerChar,word);
str[tnum]:= Copy(word,1,x-1);
delete(word,1,x);
tnum:= tnum+1;
word:= TrimLeft(word);
end;
FoundW:= '';
curs:= 0;
say:= 0;
For mi:= 1 To (tnum-1) Do Begin
Table1.FindKey([str[mi]]);
If Table1.FindKey([str[mi]]) Then Begin
len:= length(str[mi]);
curs:= curs+ len + 1;
FoundW:= FoundW + str[mi] + SerChar;
end else Begin
say:= say+1;
len:= length(str[mi]);
b[say]:= curs;
e[say]:= len;
//ilk:= curs;
//son:= len;
curs:= curs + len + 1;
FoundW:= FoundW+ str[mi] + SerChar;
ListBox1.Items.Add(str[mi]);
end;
RichEdit1.Lines.Text:= FoundW;
end;
For mi:= 1 to say Do Begin
RichEdit1.SelStart:= b[mi];
RichEdit1.SelLength:= e[mi];
RichEdit1.SelAttributes.Color:= clRed;
end;
end;
Германн (2006-12-11 23:43:00) [2]
> nurlan12 (11.12.06 23:21) [12]
>
> Desdechado
> тут других файлов нет чтоб скопировать кроме базы (*.db)
А выполнить поиск других файлов по маске "ИмяФайлаdb".* трудно?
Anatoly Podgoretsky (2006-12-11 23:33:00) [3]> nurlan12 (11.12.2006 23:21:12) [12]
> Алиас - C:\Data
Это не алиас
nurlan12 (2006-12-11 23:21:00) [4]Desdechado
тут других файлов нет чтоб скопировать кроме базы (*.db) . а зделал я базу в DatabaseDesktop-e. выбрал базу Paradox 7, индекс поставил AZ ,Алиас - C:\Data ( щас стораюсь зделать другую базу, который хотья бы работал c папкой C:\Data , а не DBDemos). что посоветуйте друзья?
Anatoly Podgoretsky (2006-12-11 14:40:00) [5]Для копирования баз надо использовать функцию БДЕ dbiCopyTable
Индексы только первая твоя проблема, возможно не последняя.
nurlan12 (2006-12-11 14:32:00) [6]в Paradox-e моя база. а какие файлы там должны быть.если кто может напишите расширении , я проверю
Desdechado (2006-12-11 13:44:00) [7]индекс - это отдельный файл или даже несколько
если БД переписываешь, то нужно всю папку, а не отдельные файлы из нее
nurlan12 (2006-12-11 13:38:00) [8]под индексом имеется ввиду имена столбцов,да? их я добавил в Table1 ( щелчок на Table1, Add field ) . на других компах ввобше не пашет, даже не с DBDemosa. а дома толька с DBDemosa работает. вы скажите пожалюста, какие информации нужны, я напишу.
Anatoly Podgoretsky (2006-12-11 12:31:00) [9]> nurl;an_12 (11.12.2006 12:23:06) [6]
Так информации не достаточно, возможно индексы не скопированы или имеют неверные имена. Возможно ошибки в проекте.
nurl;an_12 (2006-12-11 12:23:00) [10]друзья,я не из России и не хорошо знаю русский. ,поетому так неудачно получается с подстановкой задачи.Anatoly Podgoretsky , помагите пожалюста
Джо (2006-12-10 17:05:00) [11]Файл с индексами, вероятно, забыл перенести вместе с файлос данными? В протчем, судить не берусь, ибо даже формат «базы» не обнародован.
Джо (2006-12-10 17:05:00) [12]> файлос данными?
Ужас. Файлом данных.
Anatoly Podgoretsky (2006-12-10 17:01:00) [13]> Desdechado (10.12.2006 16:52:02) [2]
Да в принципе все понятно, только отвечать на такую постановку совсем не хочется.
Desdechado (2006-12-10 16:52:00) [14]http://www.ln.ua/~openxs/articles/smart-questions-ru.html
MsGuns (2006-12-10 16:22:00) [15]Что имеется в виду под "базой" ?