Witam.
z poziomu kodu tworzę tabelę przykład poniżej:
table1.DatabaseName := 'karty_pracy';
table1.TableType := ttDbase;
table1.TableName := 'p_wn'+labelededit1.text+labelededit2.text+'.dbf';;
with table1.FieldDefs do begin
Clear;
with AddFieldDef do begin
Name := 'TYP';
DataType := ftSTRING;
Size := 25;
end;
with AddFieldDef do begin
Name := 'MARKA';
DataType := ftDate;
end;
with AddFieldDef do begin
Name := 'NR_INWE';
DataType := ftSTRING;
size:=10;
end;
with AddFieldDef do begin
Name := 'nr_REJ';
DataType := ftSTRING;
size:=10;
end;
with AddFieldDef do begin
Name := 'Miejsce';
DataType := ftSTRING;
size:=20;
end;
with table1.IndexDefs do begin
Clear;
with AddIndexDef do begin
Name := 'POJAZD_0';
Fields := 'MIEJSCE;NR_INWE';
end;
end;
end;
table1.CreateTable
problem mój polega na tym, że nie mogę utworzyć indeksu (z poziomy bde indeks zakładany jest jako
expresion index MIEJSCE+NR_INWE
proszę podpowiedzieć, gdzie popełniam błąd
z góry dziękuję za sugestie
pozdrawiam
JanuszLEG