Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.25;
Скачать: CL | DM;

Вниз

вопрос про CDX   Найти похожие ветки 

 
sir_musatov   (2002-04-04 16:06) [0]

мне надо поставить в ДБФе пометку о наличии индексного файла CDX
убираю я ее так:
\\дело в том что мне этот код даи но не объяснили

Buf := 3;
FileHandler:=FileOpen(TableN,fmOpenWrite);
try
FileSeek(FileHandler,28,0);
FileWrite(FileHandler,Buf,1); // убираем пометку CDX
Buf :=0;
FileSeek(FileHandler,0,0);
FileWrite(FileHandler,Buf,1); // убираем пометку CDX
finally
FileClose(FileHandler);
end;


 
deleon ©   (2002-04-04 16:13) [1]

var
Buf: Byte;
begin
Buf := 1;
FileHandler := FileOpen(FileName, fmOpenWrite);
try
FileSeek(FileHandler, 28, soFromBeginning);
FileWrite(FileHandler, Buf, 1); // ставим пометку CDX
finally
FileClose(FileHandler);
end;
end;

Что здесь не понятно ? :)))



Страницы: 1 вся ветка

Текущий архив: 2002.04.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.015 c
1-80921
SergeyB
2002-04-04 13:47
2002.04.25
Прозрачный потомок TCustomControl


3-80736
Lt. Dennis
2002-04-03 16:46
2002.04.25
Возникла непонятная проблема со связкой IBQuery + IBUpdateSQL


1-80939
P.
2002-04-11 12:20
2002.04.25
ComboBox


1-80894
f0rm
2002-04-14 15:19
2002.04.25
Нужна процедура загрузка и сохранения item ов в listview e


3-80795
Draculenok
2002-03-21 12:54
2002.04.25
Вопрос по QReporty!!!!!!!!