发信人: redfox (NetAnt), 信区: BorlandDev
标 题: Delphi编写的积木游戏程序(3/3)
发信站: 哈工大紫丁香 (2000年10月26日17:24:42 星期四), 站内信件
unit Tetris2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs,
StdCtrls, Buttons, ExtCtrls;
type
TTetro2 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Label7: TLabel;
Label8: TLabel;
BitBtn1: TBitBtn;
Bevel1: TBevel;
Label9: TLabel;
Bevel2: TBevel;
Image1: TImage;
Bevel3: TBevel;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Tetro2: TTetro2;
implementation
{$R *.DFM}
end.
--
Inprise -- OOP开发环境的 Masterwork !!!
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.233.167]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间:2.677毫秒