我很確定我的問題是由If陳述句引起的。
我必須制定一個程式,如果我在編輯框中插入一定數量的 我必須制定一個程式,如果我在編輯框中插入一定數量的字符,并且該數量小于5,那么它將告訴我 "showmessage'請確保密碼超過5個字符';但如果它超過5個字母,它將把它列印在備忘錄表格中。但我想在一個按鈕中完成所有作業。 有什么想法嗎?
var, var.
sName : string ;
sName := edit1.text ;
if edit1.text > 6 then
begin
showmessage'please ensure that etc.
end。
這似乎并不奏效,我認為這是因為字串和整數不能一起作業。
uj5u.com熱心網友回復:
是的,你的假設是正確的--你正試圖將一個字串與一個數字進行比較,這在Delphi中是不允許的。
你需要檢查輸入的文本的長度,所以IF陳述句應該是:
if length(edit1.text) > 6 then>
另外,請注意,你說 "大于5",但你的代碼說 "大于6"。
uj5u.com熱心網友回復:
TEdit有一個GetTextLen()方法,回傳輸入的字符數:
if Edit1.GetTextLen < 5 then
begin
ShowMessage('please ensure that etc.')。
end else
begin
///根據需要使用Edit1.Text...
end;
轉載請註明出處,本文鏈接:https://www.uj5u.com/caozuo/316513.html
標籤:
