Discussion :

[tarbala]

Bonjour,
Je travaille avec le tandem DELPHI/PARADOX et j'ai besoin de créer dynamiquement, c'est-à-dire dans le code DEPLI, une table Paradox. Cela est-il faisable ? Si oui, comment ?

Merci de votre contribution combien grande.

[ShaiLeTroll]

Regarde AddFieldDef et CreateTable, dans l'aide de D7, tu as un exemple complet !

[MonPc]

Bonjour,
[QUOTE]How to create a table at runtime with TTable.[/QUOTE]

voir http://www.delphi3000.com/articles/article_281.asp?SK=

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
TTable has the capability for creating paradox tables without sql: 
 
with TTable.create(self) do 
begin 
  DatabaseName := 'C:\projects\data'; 
  TableName := 'Clients'; 
  TableType := ttParadox; 
  with FieldDefs do b 
  begin 
    Add('ID',    ftInteger, 0, True); 
    Add('FName', ftString, 25, False); 
    Add('LName', ftString, 25, False); 
  end; 
  IndexDefs.Add('MainIndex','IntField', [ixPrimary, ixUnique]); 
  CreateTable; 
end;

et regarde ce lien aussi
http://www.swissdelphicenter.ch/torr...de.php?id=1286

bon courage .