BDE连接数据库如何取消登陆框？？

Question

我用DataBase 连接了一个PARADOX数据库用Table及DBGrid控件显示数据库内容** 数据库有密码，密码为 123456 **** DataBase的LoginPrompt属性已经设置为false了 **在DataBase的Params中加入KEY: PASSWORD  VALUE: 123456但为什么还是有登陆框出现？

Answer 1

呵呵，还要加user name 哦

Answer 2

如果直接是database，loginprompt:=false;就可以了
但必须先在paramas中加入用户名和密码，否则没用
还有就是session的问题

Answer 3

各位大哥能具体说说session是怎么回事吗？还有，paramas中加入用户名密码是不是就是加入       user name      admin
       password       123456用户名是admin吗？

Answer 4

不用那么麻烦，你是新学数据库的吧。
设置 TDataBase 的 Params,填写：
User Name=admin
Password=123456
然后再把 LoginPrompt 设为 False 就OK了。

Answer 5

对啊，我是刚接触BDE，很多地方不懂，多多指教！我按照wychero(高天)的设置了，但运行的时候还是有那个登陆框提示啊，为什么？我把dfm文件内容贴出来，各位大哥请帮帮忙！  object DBGrid1: TDBGrid
    Left = 30
    Top = 155
    Width = 611
    Height = 286
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object Database1: TDatabase
    AliasName = 'W1'
    Connected = True
    DatabaseName = 'test'
    LoginPrompt = False
    Params.Strings = (
      'User Name=admin'
      'Password=123456')
    SessionName = 'Default'
    Left = 35
    Top = 25
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'test'
    SessionName = 'Default'
    TableName = 'db1.db'
    Left = 80
    Top = 25
  end

Answer 6

加一个bde的senssion控件
sessoion1.addpassword('123456')就可以了paradox没有账户名的，只有密码，不像access

Answer 7

怎么还是不行啊？是在form的oncreate事件中加
sessoion1.addpassword('123456')吗？
它还是有登陆框出现哦，我的Database和table控件的session
都已经设置成session1了啊！

Answer 8

你这现象是很怪的，一般这样设置就OK了，我怀疑是其它原因导致的。你按以下方法试一试：
1、把目录下的 dcu 全部删除，然后再重新 Compile 一遍看看怎么样。
2、如果第一种方法不行，你再在一下新窗体里放以后那些控件，设置一下属性，（主要方法都告诉你了）看怎么样？
等你的消息。

Answer 9

LoginPrompt=false
且设好user name和password就可以了啊

Answer 10

哦～现在又可以了……现在我的情况是这样的：窗体上有 DataBase、Table、Session、DataSource、DBGrid控件各一个
DataBase控件没有设置user name和password，并且LoginPrompt=false在窗体的oncreate事件中加入如下代码：procedure TForm1.FormCreate(Sender: TObject);
begin
  Session1.Active:=false;
  Session1.AddPassword('123456');
  Session1.Active:=true;
  Table1.TableName:='客户编码.db';
  Table1.Active:=true;
end;不出现登陆框了！非常感谢各位！！