Crearea unei baze de date Paradox programat
Cum se face acest lucru?
Am găsit câteva exemple, dar nici una nu funcționează
# xA0; cu TTable.Create (Self) faci
# xA0; începeți // creați obiectul TTable
# xA0; # xA0; DatabaseName: = "c: \ temp"; // indicați spre director sau pseudonim
# xA0; # xA0; TableName: = "FOO"; // dați tabelului un nume
# xA0; # xA0; TableType: = ttParadox; // face o masă Paradox
# xA0; # xA0; cu FieldDefs face
# xA0; # xA0; începeți
# xA0; # xA0; # xA0; Adăugați ("Age", ftInteger, 0, True); // adăugați un câmp întreg
# xA0; # xA0; # xA0; Adăugați ("Nume", ftString, 25, False); // adăugați un câmp de șir
# xA0; # xA0; # xA0; Adăugați ("Greutate", ftFloat, 0, Fals); // adăugați un câmp în virgulă mobilă
# xA0; # xA0; sfârșitul;
# xA0; # xA0;
# xA0; # xA0; IndexDefs.Add ("", "Vârstă", [ixPrimary, ixUnique]);
# xA0; # xA0; CreateTable; // creați tabelul
# xA0; sfârșitul;
și așa am încercat
sql: = "CREATE TABLE" angajat.db "(Last_Name CHAR (20),
# xA0; # xA0; # xA0; First_Name CHAR (15), Salariul NUMERIC (10,2),
# xA0; # xA0; # xA0; Dept_No SMALLINT, KEY PRIMARY (Last_Name, First_Name)) ";
Query1.sql.text: = sql;
Query1.ExecSQL;
Cel mai corect exemplu din CreateTable + F1
Aceasta este crearea unui tabel și crearea bazei de date CreateDir
Aceasta este o problemă dureroasă.
Încercați să adăugați extensia de creare fără index și apoi încercați cu indexul, indicii curenți trebuie, de asemenea, să fie șterși.
"CREATE TABLE" employee.db "(Last_Name CHAR (20),
# xA0; # xA0; # xA0; First_Name CHAR (15), Salariul NUMERIC (10,2),
# xA0; # xA0; # xA0; Dept_No SMALLINT, CHEIE PRIMARĂ (Last_Name, First_Name)) ";
"employee.db" - Nu sunt sigur, iar acest lucru ar trebui luat în ghilimele. (cu mult timp în urmă, bazele nu au jucat.
și totuși, poate că sunt un ratat în asta
(și din moment ce ai rezolvat, îmi pare rău, e amuzant)
și apoi am mers mai departe. Îmi pare rău am curent curent și pot face o mulțime de răutate.
Ce coșmar. Oamenii chiar citesc scrisori timp de 3 zile leneș pentru a citi. Sunteți deja 4 sau 5 pe săptămână, care mestecați această întrebare.
repetarea mamei uchene - pare așa.
Articole similare
Trimiteți-le prietenilor: