部分代碼：
procedure TForm1.Button1Click(Sender: TObject);
begin
begin
if edit1.Text=datamodule1.ADsid.Lookup('name',combobox1.Text,'password') then
begin
main.Show;
form1.Visible:=false;
end
else
showmessage('對不起，您輸入的密碼錯誤！');
end;
uj5u.com熱心網友回復：
要先創建datamodule1uj5u.com熱心網友回復：
單步除錯, 看看哪個物件沒創建uj5u.com熱心網友回復：
為什么一定要這樣弄登陸表單呢 ？為什么不在主程式檔案里面做個修改呢？先顯示登陸表單在顯示主表單。我看你這個應該是先顯示主表單（登陸表單）然后再在顯示其他表單（主界面）吧。
uj5u.com熱心網友回復：
datamodule1.ADsid.Lookup('name',combobox1.Text,'password') 有問題資料庫可能都沒有鏈接呢，當然報錯
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/120056.html
標籤：語言基礎/算法/系統設計