按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
program Tyssql；
uses
Forms；
Unit1 in 'UNIT1。PAS' ｛Form1｝；
Unit2 in 'UNIT2。PAS' ｛Form2｝；
｛R *。RES｝
begin
Application。CreateForm（TForm2； Form2）；
Application。CreateForm（TForm1； Form1）；
Application。Run；
end。
unit Unit1；
interface
uses
SysUtils； WinTypes； WinProcs； Messages； Classes； Graphics； Controls；
Forms； Dialogs；
type
TForm1 = class（TForm）
private
｛ Private declarations ｝
public
｛ Public declarations ｝
end；
var
Form1： TForm1；
implementation
｛R *。DFM｝
523
…………………………………………………………Page 524……………………………………………………………
SQL 21 日自学通（V1。0） 翻译人 笨猪
end。
unit Unit2；
interface
uses
SysUtils； WinTypes； WinProcs； Messages； Classes； Graphics； Controls；
StdCtrls； Forms； DBCtrls； DB； DBGrids； DBTables； Grids； Mask； ExtCtrls；
type
TForm2 = class（TForm）
ScrollBox： TScrollBox；
Label1： TLabel；
EditPARTNUM： TDBEdit；
Label2： TLabel；
EditDESCRIPTION： TDBEdit；
Label3： TLabel；
EditPRICE： TDBEdit；
DBGrid1： TDBGrid；
DBNavigator： TDBNavigator；
Panel1： TPanel；
DataSource1： TDataSource；
Panel2： TPanel；
Panel3： TPanel；
Query1： TQuery；
Query2： TQuery；
DataSource2： TDataSource；
procedure FormCreate（Sender： TObject）；
private
｛ private declarations ｝
public
｛ public declarations ｝
end；
524
…………………………………………………………Page 525……………………………………………………………
SQL 21 日自学通（V1。0） 翻译人 笨猪
var
Form2： TForm2；
implementation
｛R *。DFM｝
procedure TForm2。FormCreate（Sender： TObject）；
begin
Query1。Open；
Query2。Open；
end；
end。
525
…………………………………………………………Page 526……………………………………………………………
SQL 21 日自学通（V1。0） 翻译人 笨猪
附件 D 参考内容
书
Developing Sybase Applications
发行社 Sams
作者 Daniel J。 Worden
ISBN： 0…672…30700…6
Sybase Developer's Guide
发行社 Sams
作者 Daniel J。 Worden
ISBN： 0…672…30467…8
Microsoft SQL Server 6。5 Unleashed； 2E
发行社 Sams
作者 David Solomon； Ray Rankins； et al。
ISBN： 0…672…30956…4
Teach Yourself Delphi in 21 Days
发行社 Sams
作者 Andrew Wozniewicz
ISBN： 0…672…30470…8
Delphi Developer's Guide
发行社 Sams
作者 Steve Teixeira and Xavier Pacheco
ISBN： 0…672…30704…9
526
…………………………………………………………Page 527……………………………………………………………
SQL 21 日自学通（V1。0） 翻译人 笨猪
Delphi Programming Unleashed
出版社 Sams
作者 Charlie Calvert
ISBN： 0…672…30499…6
Essential Oracle 7。2
出版社 Sams
作者 Tom Luers
ISBN： 0…672…30873…8
Developing Personal Oracle7 for Windows 95
Applications
出版社： Sams
作者： David Lockman
ISBN： 0…672…31025…2
Teach Yourself C＋＋ Programming in 21 Days
出版社： Sams
作者： Jesse Liberty
ISBN： 0…672…30541…0
Teach Yourself Tansact…SQL in 21 Days
出版社： SAMS
作者： Bennett Wm。 McEwan and David Solomon
ISBN： 0…672…31045…7
Teach Yourself PL/SQL in 21 Days
出版社： SAMS
作者： Tom Luers； Timothy Atwood； and Jonathan Gennick
ISBN： 0…672…31123…2
请访问着站点mcp。 以得到更多的信息
527
…………………………………………………………Page 528……………………………………………………………
SQL 21 日自学通（V1。0） 翻译人 笨猪
杂志
DBMS
P。O Box 469039
Escondido； CA 92046…9039
800…334…8152
Oracle Magazine
500 Oracle Parkway
Box 659510 Redwood Shores； CA 94065…1600
415…506…5304
SQL 的互联网资源
http：//aslaninc。/
Aslan 计算机有限公司 提供的 SQL 数据库 WINDOWS 开发工具 WINDOWS NT
组网以互联网服务技术
http：//radix/~ablaze/
Ablaze 商业有限公司 主要提供 Microsoft 的 Visual Basic； MS Server； PowerBuilder；
以及 Internet 解决方案。
http：//fourgen。/
FourGen 提供支持 Windows 4GL UNIX SQL OLE 的开放系统标准。
http：//innovision1。/steelep4/ddi。html
Digital Dreamshop 提供新型的客户机/服务器应用程序 计算机图形服务和 Visual Basic；
Access； Transact…SQL； C＋＋； and Delphi 的通信软件程序
http：//novalink。/bachman/index。html
Bachman 信息系统 为 Sybase 和 Microsoft SQL Server 数据库提供设计工具和开发工
具的供应商
http：//everyware。/
EveryWare Develop