
 ࠡ  묨 Delphi ᯮ BDE - Borland DataBase Engine.
BDE - ।⢮ 㯠   筨  १  API.
IDAPI (Integrated Database Application Program Interface) -   API
 BDE. IDAPI 砥  㭪樨, 室  㯠  ,
㫨஢   .. Delphi, dBASE for Windows,  Paradox for Windows
ᯮ  㭪樨.  ஢ 맮 IDAPI  Delphi  
ꥪ⭮ 窮 ,   室 
ᯮ짮  ᢮ ணࠬ.  ⠢ Delphi  㬥
 㭪 IDAPI,   , ਬ, ᫨ 㯨 ⤥쭮 BDE.
 Delphi ( ४ਨ X:\DELPHI\DOC) ।⠢ 䥩 
㫥 DBIProcs, DBITypes  DBIConst, १  ந室 맮 IDAPI.
᫨ ᬮ  室 VCL,   㢨,   .
 㭪権 IDAPI 稭  "Dbi" (ਬ, DbiCreateTable).

㠫  Delphi (TTable, TQuery  .. )  室
᢮⢠ (Handle, DBHandle  .)  ᯮ짮  맮 IDAPI.

室 ਬ 㭪権 IDAPI , ⠪   ⠭⭮
  ॠ    BDE.  ஬ ⮣ -
 ࠡ  묨 ⠡栬  ଠ dBase  Paradox, ᪮
ᮡ  ଠ⮢     ⨯ DataSet.


 BDE,  ॠ  ⠭⭮   Delphi:

  - ᯮ  QBE (Query By Example),  㦥 
    業  TQBE,  祭 宦  TQuery;

  - । 䨫 ந쭮      ⠡;

  -   ᥢ(Alias)  䠩 䨣樨 BDE.


  ᤥ  ⠡栬 Paradox  dBase, ᯮ IDAPI,  ,
ᯮ  TTable.

Paradox:
  - 㯠 ⠡
  - ந ࠧ襭 
  - 㧭 ᪨  
  - ᬥ ஫

dBase:
  - 㯠 ⠡
  - ந ࠧ襭 
  - /몫 ᬮ 祭  㤠 ᥩ
  - ⠭ 祭  㤠 
  - 㧭 䨧᪨  



ਬ ਬ:

 ⠡ Paradox ᬥ ஫  㯠 ⠡ ந 
맮 㭪樨 DbiDoRestructure(...)

procedure TForm1.ParadoxRestructure;
var
  crTblDsc : CRTblDesc;
  PHdb     :  hDBIDb;

const
  szTblName = 'pdoxtbl';
  szTblType = szParadox;
  szProbl   = '~~Probl';

begin
  phDB:=Table1.DBHandle;
  FillChar(crTblDsc, SizeOf(CRTblDesc), #0);
  StrCopy(crTblDsc.szTblName, szTblName);
  StrCopy(crTblDsc.szTblType, szTblType);
      { Set the Password information }
  crTblDsc.bProtected := Bool(TRUE);
  StrCopy(crTblDsc.szPassword, 'New Password');
      { Pack table }
  crTblDsc.bPack := Bool(TRUE);

  Table1.Active:=False;
  DbiDoRestructure(phDb, 1, @crTblDsc, nil, nil, pCHAR(szProbl), False);
  Table1.Active:=True;
end;




ਬ ᯮ짮  맮 IDAPI  ࠡ  ⠡栬 dBase 
Paradox    䠩 EX?.*:

