سوال: پنجره لوگین [بایگانی]

ohdsati

پنج شنبه 06 خرداد 1395, 18:24 عصر

سلام.

من می خوام یک برنامه بنویسم که در پنجره اول باید ورود کنی و در تنظیمات هم بتوان نام کاربری و کلمه عبور رو تغییر داد.

حالا من دو فیلد با نام های usernames و passwords در تنظیمات و دو فیلد با نام های usernamel و passwordl در پنجره لوگین ساختم. نام پنجره لوگین Lts و پنجره تنظیمات sett هست. یک فیلد هم ساختم در صفحه لوگین که پشت عناصر گذاشتمش به نام Ltse. دو دکمه هم در صفحه لوگین گذاشتم به نام ورود و خروج.

حالا روش کارم اینه که :
با کلیک روی دکمه ورود:
1- اگر متن فیلد usernamel مطابق متن فیلد usernames بود مقدار متن Ltse را دو کن.
در غیر این صورت مقدار متن Ltse را یک کن
2- اگر متن فیلد passwordl مطابق متن فیلد passwords بود مقدار متن Ltse را به اضافه خودش کن. (دوبرابر کن)
در غیر این صورت مقدار متن Ltse را یک کن
3- اگر مقدار متن Ltse عدد 4 بود این پنجره را پنهان و پنجره تنظیمات را نشان بده.
در غیر این صورت مقدار متن usernamel و مقدار متن passwordl را پاک کن.

حالا قطعه کد مرحله 1 مگه قطعه زیر نیست؟ چون وقتی واردش می کنم ارور می دهد. و میگوید کلمه then اشتباه است!!!

if usernamel.Text := sett.usernames.Text then ltse.Text := '2'

else ltse.Text := '1'

hp1361

پنج شنبه 06 خرداد 1395, 22:23 عصر