اضافه کردن فیلد به جداول DBISAM

[nasr]

سلام
چگونه می توان در جداول DBISAM فیلدی اضافه یا کم کرد و یا نوع فیلدها را از عددی به متنی و غیره تبدیل کرد.
ممنون

[Delphi-Clinic]

به این مثال دقت کنید:



begin
with MyDBISAMTable do
begin
DatabaseName:='d:\temp';
TableName:='customer';
with FieldDefs do
begin
Clear;
Add('CustNo',ftFloat,0,False);
Add('Company',ftString,30,False);
Add('Addr1',ftString,30,False);
Add('Addr2',ftString,30,False);
Add('City',ftString,15,False);
Add('State',ftString,20,False);
Add('Zip',ftString,10,False);
Add('Country',ftString,20,False);
Add('Phone',ftString,15,False);
Add('FAX',ftString,15,False);
Add('TaxRate',ftFloat,0,False);
Add('Contact',ftString,20,False);
Add('LastInvoiceDate',ftDateTime,0,False);
end;
with IndexDefs do
begin
Clear;
Add('','CustNo',[ixPrimary]);
Add('ByCompany','Company',[ixCaseInsensitive]);
end;
if not Exists then
CreateTable;
end;
end;



برای اطلاعات بیشتر در راهنمای DBISAM به این بخش مراجعه کنید:

Creating Tables