📄 createtableexample.htm
字号:
<html>
<head>
<title></title>
</head>
<!--#include virtual="/inc/header.php"-->
<table width="100%" border="0" cellspacing="0" cellpadding="2" bgcolor="#FFFFFF">
<tr>
<td align="left">
<span style="font-family:Helvetica,Arial; font-size:12pt; color:#000000"><b>Create Table Example
<br>
</b></span>
</td>
<td align="right">
<font face="Arial" size="2">
<a href="overview.htm">Top</a>
</font>
</td>
</tr>
</table>
<br><br>
<span style="font-family:Helvetica,Arial; font-size:10pt; color:#000000">
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000000"> <span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{set up database component}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
ABSDatabase1.DatabaseName := <span style="font-family:Courier New; font-size:8pt; color:#000080">'emp_db'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">;
<br>
ABSDatabase1.DatabaseFileName := <span style="font-family:Courier New; font-size:8pt; color:#000080">'c:\data\employee_db.abs'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">;
<br>
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{set up table component}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
ABSTable1.DatabaseName := <span style="font-family:Courier New; font-size:8pt; color:#000080">'emp_db'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">;
<br>
ABSTable1.TableName := <span style="font-family:Courier New; font-size:8pt; color:#000080">'employee'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">;
<br>
</span><span style="font-family:Helvetica,Arial; font-size:10pt; color:#000000">
<br>
</span><span style="font-family:Courier New; font-size:8pt; color:#000000"> <b>with</b> ABSTable1 <b>do</b>
<br>
<b>begin</b>
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{specifying table fields}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
<b>with</b> FieldDefs <b>do</b>
<br>
<b>begin</b>
<br>
Clear;
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'EmpNo'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,ftAutoInc,<span style="font-family:Courier New; font-size:8pt; color:#000080">0</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,False);
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'LastName'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,ftString,2<span style="font-family:Courier New; font-size:8pt; color:#000080">0</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,False);
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'FirstName'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,ftString,15,False);
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'PhoneExt'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,ftString,4,False);
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'HireDate'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,ftDate,<span style="font-family:Courier New; font-size:8pt; color:#000080">0</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,False);
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'Salary'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,ftCurrency,<span style="font-family:Courier New; font-size:8pt; color:#000080">0</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,False);
<br>
<b>end</b>;
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{specifying table indexes}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
<b>with</b> IndexDefs <b>do</b>
<br>
<b>begin</b>
<br>
Clear;
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'idxPrimary'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,<span style="font-family:Courier New; font-size:8pt; color:#000080">'EmpNo'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,[ixPrimary]);
<br>
Add(<span style="font-family:Courier New; font-size:8pt; color:#000080">'idxByLastNameFirstName'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,<span style="font-family:Courier New; font-size:8pt; color:#000080">'LastName;FirstName'</span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">,[ixCaseInsensitive]);
<br>
<b>end</b>;
<br>
<b>end</b>;
<br>
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{create the database}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
<b>with</b> ABSDatabase1 <b>do</b>
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{if database file doesn't exist}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
<b>if</b> <b>not</b> Exists <b>then</b>
<br>
CreateDatabase;
<br>
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{and create the table}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
<b>with</b> ABSTable1 <b>do</b>
<br>
<span style="font-family:Courier New; font-size:8pt; color:#000080"><i>{if table doesn't exist}</i></span></span><span style="font-family:Courier New; font-size:8pt; color:#000000">
<br>
<b>if</b> <b>not</b> Exists <b>then</b>
<br>
CreateTable;
<br>
<br>
</span></span>
<!--#include virtual="/inc/footer.php"-->
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -