sql+delphi的登陆窗口怎么搞的？

显示全部楼层 · 2009-3-17 14:37:32

学习delphi10天了，真都笨的什么都没学会
问点菜鸟问题...
我安装的sql2000server 建立了数据库jialian_data.mdf
在该数据库中建立了password的表，在表里写了3个字段
lsh,user,passwords
lsh不知道怎么搞自动排号，accsee就简单，自动的序号
我设置了主键也只能手动排号
3个组件ADOConnection1设置了jialian_data.mdf的绝对路径（只改了这1项）
DataSource1的connection加的ADOConnection1（只改了这1项）
DataSource1的dataset加的ADOQuery1（只改了这1项）
还有个combobox1组件和edit1组件，没其他的了
我下面的正确吗？编译是通过了，可是怎么老是执行showmessage('密码或部门错误');这句？我输入对了表里的字段也不行
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from password where user=''' + combobox1.Text + '''and passwords='''+edit1.Text + '''');
adoquery1.Open;
if adoquery1.RecordCount=1 then
begin
form1.Hide;
form2.Show;
end
else
begin
showmessage('密码或部门错误');
end;
end;
end.

千问 · 2009-3-17 14:37:32

lsh字段要设置自动增长。打开表，再选择lsh字段，再下方有个属性，里面有个“标识列”，你选择是。delphi的话，不是很懂。...