Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

добавить программно поле в таблицу dbf Заманался уже!!!! [D5, dBase, FoxPro]

Sergey_Elf © (2002-11-25 09:13:00)
как можно добавить поле в таблицу dbase из программы?
какие есть способы?

asafr (2002-11-25 12:14:00) [1]
Используй ALTER TABLE и не мудри. Почитай еще какую-нибудь литературку по основам SQL.

Fishka (2002-11-25 12:11:00) [2]
Поле в существующую таблицу можно добавить SQL-запросом:
ALTER TABLE "C:\aa.dbf" ADD New_pole character(21)

Sergey_Elf (2002-11-25 10:36:00) [3]
не помогло.........
вообще такое ощущение, что системку переставлять надо
а то даже datetimepicker такую фигню выдавал на машине..
у соседа скомпилил все ок

Valeron (2002-11-25 10:31:00) [4]
У тебя ls_fio написан не верхнем регистре, у меня тоже не работало пока не написал в все слово в верхнем регистре. Это наверное глюк, а может так по умолчанию в BDE.

Sergey_Elf (2002-11-25 10:27:00) [5]
что-то у меня не работает....
а это случайно не расчетные поля?
мне надо постоянные..... у меня таблица на 40 отдельных машинах
надо в эту таблицу автоматом добавить поля
а на dbf работает такое?
я написал:
ttable1.FieldDefs.Add("ls_fio", ftString, 30, true);
ttable1.FieldDefs[ttable1.FieldDefs.Count-1].CreateField(ttable1);
потом делаю open а он говорит такого поля нет

Valeron (2002-11-25 10:09:00) [6]
with MySql do
begin
DataBaseName := "cadr";
AutoCalcFields := true;
OnCalcFields := MyCalcFields;
with FieldDefs do
begin
Add("phone", ftFloat, 0, true);
FieldDefs[0].CreateField(MySql);

Add("FIO", ftString, 100, true);
FieldDefs[1].CreateField(MySql);

Add("N_D", ftString, 100, true);
FieldDefs[2].CreateField(MySql);

Add("L_of_S", ftString, 100, true);
FieldDefs[3].CreateField(MySql);

Add("NOTE", ftString, 100, true);
FieldDefs[4].CreateField(MySql);

Add("TYPE", ftString, 100, true);
FieldDefs[5].CreateField(MySql);

Add("DATA", ftDate, 0, true);
FieldDefs[6].CreateField(MySql);

Add("ID", ftString, 15, true);
FieldDefs[7].CreateField(MySql);

Add("VYDAN", ftString, 250, true);
FieldDefs[8].CreateField(MySql);

Add("PLASE_WORK", ftString, 250, true);
FieldDefs[9].CreateField(MySql);

Numer := TIntegerField.Create(MySql);
with Numer do
begin
FieldName := "Numer";
Calculated := True;
DataSet := MySql;
Name := MySql.Name + FieldName;
MySql.FieldDefs.Add(Name, ftInteger, 0, true);
end;
end;
end;

Sergey_Elf (2002-11-25 09:51:00) [7]
есть таблица - файл dbf
могу открыть как компоненту table

Valeron (2002-11-25 09:46:00) [8]
В таблицу на физическом уровне? Или в компоненте?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »