帮忙看下delphi程序 简单按照书上例子写了程序，运行的时候出现错误

Posted 2023-04-23

错误提示如下

程序如下
unit Unit12014_6_27;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, DBCtrls, DB, ADODB, StdCtrls, Grids, DBGrids;

type
TForm1 = class(TForm)
ADOConnection1: TADOConnection;
ADOCommand1: TADOCommand;
Label1: TLabel;
Label2: TLabel;
DataSource1: TDataSource;
ADOTable1: TADOTable;
DBNavigator1: TDBNavigator;
Label3: TLabel;
Label4: TLabel;
DBGrid1: TDBGrid;
Label5: TLabel;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
private
Private declarations
function fTableExits:Boolean;

public
Public declarations
end;

var
Form1: TForm1;

implementation

$R *.dfm
function TForm1.fTableExits:Boolean;
var
SL:TStrings;
index:Integer;
begin
Result:=False;
if not AdoConnection1.Connected then exit;
SL:=TStringList.Create;
try
ADOConnection1.GetTableNames(SL,False);
Result:=(SL.IndexOf('通讯录')>=0);
finally
SL.Free;
end;

end;

procedure TForm1.FormCreate(Sender: TObject);
begin
ADOConnection1.Connected:=True; //激活链接
if not fTableExits then //如果数据库中不存在通讯录表
begin
try
ADOCommand1.CommandText:='CREATE TABLE 通讯录(姓名 varchar(10),'+'性别 varchar(2) DEFAULT''男'',地址 varchar(20),电话 varchar(12),手机 varchar(12)'+',PRIMARY KEY (姓名),备注 varchar(40),自动编号 int IDENTITY(1，1))';
ADOCommand1.Execute;
except
Application.MessageBox('创建失败.','请注意',MB_OK);
end;
end;
ADOTable1.TableName:='通讯录';
ADOTable1.Open;

end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
AdoConnection1.Connected:=False;

end;

end.
完全按照教材上的例子打的程序，问一下哪错了。。
麻烦哪位大神最好把程序运行下，然后告诉我哪里错了。。。或者详细的告诉我哪里错了。

参考技术A 感觉可能是你在给新表定义字段的时候，那几个引号用的有问题，建议你单定义一个String变量，然后把你要写得SQL语句先赋值给那个变量，然后用单步执行看一下那个变量里的内容，看看你写进去的语句对不对追问

大哥，我也觉得那段有问题，如果您老有时间，能不能在你机子上运行一下，给详细的指出下。

参考技术B 建议你用单步执行看看是哪步出的问题 参考技术C 检查一下Create table那段有没有什么问题

第一个Android程序

其实不是第一个了，之前已经按照书上写了几个，但是木有写过安卓的blog，还是用第一个吧。

平台是：Android Studio 3.0版本

一百年不变的"hello, world"。

adb的使用

这里直接安装的是Android Studio，而且是连的真机调试的。

Android Studio的工程目录结构

.idea：//AS生成的工程配置文件，类似Eclipse的project.properties。

app：//AS创建工程中的一个Module。

gradle：//构建工具系统的jar和wrapper等，jar告诉了AS如何与系统安装的gradle构建联系。

java：//Java代码，包含工程和新建是默认产生的Test工程源码 
res： //资源文件，类似Eclipse。
    drawable：
    layout：//App布局及界面元素配置
    mipmap：
    values：
        colors.xml： //定义颜色的配置文件。 
        strings.xml：//定义字符串的配置文件。 
        styles.xml： //定义style的配置文件。
manifests：
    AndroidManifest.xml：//App基本信息（Android管理文件，也是入口文件） 
Gradle Scripts

res目录下所有的资源文件都会在R.java文件下生成对应的资源id，我们可以直接通过资源id访问到对应的资源；这个R文件可以理解为字典，res下每个资源都都会在这里生成一个唯一的id！

三个重要的文件

MainActivity.java

布局文件：activity_main.xml：

配置文件AndroidManifest.xml:
AndroidManifest文件中含有如下过滤器的Activity组件为默认启动类当程序启动时系统自动调用它

<intent-filter>
    <action android:name="android.intent.action.MAIN" />
    <category android:name="android.intent.category.LAUNCHER" />
</intent-filter>

intent-filter表示在打开程序时会先去执行这个Activity。