网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
delphi吧 关注：17,474贴子：81,671
  • 9回复贴，共1页

为什么会这样的。初学者

unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, ADODB;
type TForm1 = class(TForm) ADOConnection1: TADOConnection; ADOQuery1: TADOQuery; DataSource1: TDataSource; DBGrid1: TDBGrid;procedure TForm1.Button1Click(Sender: TObject);beginADOQuery.Close;ADOQuery.SQL.Clear;ADOQuery.SQL.Add('select * from zd_ry ');ADOQuery.Open;end;var Form1: TForm1;
implementation
{$R *.dfm}
end.




把代码先排版好吧～


unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, ADODB;
type TForm1 = class(TForm)
ADOConnection1: TADOConnection;
ADOQuery1: TADOQuery;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
procedure TForm1.Button1Click(Sender: TObject);
beginADOQuery.Close;ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('select * from zd_ry ');
ADOQuery.Open;end;var Form1: TForm1;
implementation
{$R *.dfm}
end.


貌似过程在interface区只做声明。要在实现区中写代码啊。。好诡异的代码
　 --我不是小尾巴 我怎么会是小尾巴呢对不对。。


代码怎么写到interface区去了？


我以为是 控制台程序呢


你是自己写的吗，系统自动生成就好啊一般是。这些都放在implementation后面啊，你先好好看基础视频吧。


楼主大概是没脸回来了。


12楼亮了~


扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 9回复贴，共1页
分享到: