delphi簡單登陸 有錯

時間 2022-10-08 21:25:08

1樓:匿名使用者

procedure tform1.button1click(sender: tobject);

const

name = 'delphi';

pwd = 'delphi';

begin

if not (nameedit.text=name) thenbegin

showmessage('使用者名稱錯誤');

nameedit.text:='';

nameedit.setfocus;

endelse if not(pwdedit.text=pwd) thenbegin

showmessage('密碼錯誤');

pwdedit.text:='';

pwdedit.setfocus;

endelse

begin

form2.show;

form1.hide;

end;

end;

end.

你那是變數帶初始值的定義方法

要不你把const換成var也行

varname:string='delphi';

pwd:string='delphi';

2樓:黑貓程式設計

你之前有沒有定義變數name和pwd呢?

我測試的時候只要定義了name和pwd就ok了啊!

你自己再看看,程式結構應該沒有問題

163郵箱登陸怎麼登陸,電腦怎麼登陸163郵箱

163郵箱需要先註冊才能登陸。1 先找到163郵箱介面,介面有兩個按鈕,一個是登入,一個是註冊,點註冊按鈕。進入註冊畫面。2 按照註冊畫面填寫內容,按要求設定密碼,建議註冊手機郵箱,方便容易記憶。3 註冊成功後,就可以登入到163郵箱了。4 電子郵箱,現在用的越來越普遍,擁有一個郵箱可以傳遞更多的資...

登陸不顯示上次登陸名

重灌一下系統吧,我的裝了那個卡卡也這樣,怎麼弄都弄不出來。以後用卡卡的時候,清理的時候不要清的太徹底了。清清上網痕跡什麼的就行了。刪除了是不能恢復的 之所以沒有了,是因為你用兔子清理掉了 兔子裡面點清除 使用痕跡 就會把所有上網,表單記錄,儲存的密碼等都刪除掉 如果你想以後儲存你的表單和密碼,你可以...

DNF無法登陸,DNF無法登陸!!!!

垃圾tx是這樣的重新下一道吧,可憐的孩子 別玩了 那麼垃圾還玩 我玩遊戲 新區的話 1小時登不上去 老區3次登不上去 我就放棄那遊戲 我是玩遊戲的 不是被玩的 玩的遊戲還要看你的臉色 去你mb把 和我學習學習 1是你得垃圾檔案多了 2是你的檔案 主要執行檔案破壞掉了 比方 機器突然 重啟引起或者 更...