Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];




Вниз

как программно узнать является поле ключем или нет? 


dron1   (2002-03-09 13:21) [0]

такой вопрос. Есть таблица Paradox в ней одно поле Name является ключевым. Field.IsIndexField возвращает FALSE. Как можно узнать является ли поле ключевым?



deleon   (2002-03-11 10:41) [1]

(c)Degisy Software

{Для Paradox & DBase7 only}

function IsKeyField(Tbl: TTable; FldName: string): Boolean;
var
I : Integer;
Pos : Integer;
begin
Result := False;
if not Tbl.IndexDefs.Updated then Tbl.IndexDefs.Update;
for I := 0 to Tbl.IndexDefs.Count - 1 do
if( ixPrimary in Tbl.IndexDefs[I].Options )then
begin
Pos := 1;
while Pos <= Length(Tbl.IndexDefs[I].Fields) do
if( CompareText(ExtractFieldName(Tbl.IndexDefs[I].Fields, Pos), FldName) = 0 )then
begin
Result := True;
Break;
end;
if( Result )then Break;
end;
end;




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.027 c
3-9387            dron1                 2002-03-09 13:21  2002.04.04  
как программно узнать является поле ключем или нет?


3-9359            Turalyon              2002-03-11 12:08  2002.04.04  
Триггеры и генераторы в IB6


3-9370            Demon ltd             2002-03-11 22:39  2002.04.04  
Удаление из таблицы, опять


3-9362            Ghostlady             2002-03-11 16:44  2002.04.04  
Падает база данных без видимых причин


14-9631           Fred                  2002-02-23 08:02  2002.04.04  
Как засинхронизироваться по времени от другого коммпьютера?