+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : Login Form with checkbox (remember me ) (/showthread.php?tid=10718)
Login Form with checkbox (remember me ) - Rever7eR - 27-03-2020
السلام عليكم , اتمنى ان تكونو بصحة جيدة
احاول عمل شاشة تسجيل (login form) لكن واجهتني بعض المشاكل .
السؤال الأول , هل يجب علي انشاء ال Main form أولا أم ال Login form ؟ (أقصد الطريقة الصحيحة)
السؤال الثاني : ما المشكل بالكود :
PHP كود :
procedure TForm1.FormCreate(Sender: TObject);
var s : string; Ini : TiniFile;
begin
if fileexists('settings.ini') then
Ini := tinifile.Create(GetCurrentDir+'\Settings.ini');
s := Ini.Readstring('Config','nologin','');
if s = 'true' then
begin
self.Hide;
form2.Show;
end;
myini.Free;
end;
رغم انني قمت بتنقيح البرنامج و الخلل بالتعليمة form2.show و هذا سبب طرحي للتساؤل الأول .
شاهدت كم من موضوع حول استعمال ملفات الini على المنتدى و كانت مواضيع مفيدة صراحة , وجدت مثال لكنه يتعامل مع ال splash screen
و قد وضع الcheckbox على الMain Form لكني اريد العكس , شكرا مسبقا
RE: Login Form with checkbox (remember me ) - Rever7eR - 27-03-2020
توصلت اخيرا الى حل ... لكنني غير راض عن النتيجة
الكود يحتاج Optimization
RE: Login Form with checkbox (remember me ) - delphi17 - 27-03-2020
الترتيب الذي اعتمده انا
Datamodel
Main
Login form create in run time