自杀的心都有了?求高手指点 ( 积分: 20 )

I

IT菜鸟

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #1

写了一段程序 如下:
begin
if combobox1.Text='' then
ShowMessage('请选择目录级别')
else
str:='insert into type where passid:='''+trim(combobox1.text)+''' and name:='''+trim(edit1.Text)+'''';
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add(str);
adoquery1.Open;
end;
运行出现以下错误
[Error] Unit1.pas(123): Undeclared identifier: 'ShowMessage'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
请高手指点

 

I

IT菜鸟

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #2

请求指点啊

 

L

ludemin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #3

在uses中加上Dialogs

 

R

Rainstorey

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #4

uses Dialogs

 

M

maze78

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #5

ShowMessage 在 Dialogs单元中不知道你引用没有
代码没问题。

 

李

李翔鹏

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #6

str:='insert into type where passid:='''+trim(combobox1.text)+''' and name:='''+trim(edit1.Text)+'''';
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add(str);
adoquery1.Open; //不能用OPEN，用EXECSQL；

 

A

asksomeone

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #7

同意,楼上的综合起来就能让楼主不再轻生了,呵呵,救人一命啊

 

白

白河愁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #8

这么的错误都不会排除，不自杀也可惜了。

 

Z

zgh777

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #9

同意楼上！

 

G

godelphi2004

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #10

确实可惜了。。。

唉！现在大富翁上来的怎么都是这么些腿？不知道这些人做程序员都在干什么？？？

 

T

tankyhai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #11

呵呵，同意楼上的...

 

3

3868474

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #12

passid:=
name:=

sql不是delphi，赋值不要冒号

 

L

lifc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #13

这有时问题还真就是出现在ExecSQL和Open

要是楼主真的轻生了，那可就惨喽！[]

 

Y

YANGWEI0308

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-03

• #14

还是坚强一点吧，谁都是从菜鸟开始做起！

 

X

XF.Lian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-04

• #15

begin
if combobox1.Text='' then
begin
ShowMessage('请选择目录级别');
Exit;
end
else
begin
str:='insert into type where passid='+#39+trim(combobox1.text)+#39+' and name='+#39+trim(edit1.Text)+#39;
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add(str);
adoquery1.ExecSQL;
end;
end;

 

A

ahfycj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-08-10

• #16

intsert into 表(字段1,字段2) values (值,值) where ----