مشكله في اغلاق الفورم الاول

[Raed]

وضعت الاكواد وغيرت الـTag ولكن يعطيني اخطاء عند تشغيل البرنامج يقول هنالك نقص بعد كلمة Enable

PHP كود :

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
  TRadioButton.Enabled := TRadioButton.Tag = 1;
end; 


الكود الخاص بك

PHP كود :

RadioButton1.Enabled := RadioButton1.Tag = 1; 


يعطني اشاره حمرا عليه بمعنى اخطاء  كما قلت لك انا مبتدى في هذه اللغه لا اعلم الكثير وقبل سؤالك قد بثت كثيرا عبر الانترنت ولكن لم اجد نتيجه

[sofiane201]

أخب Raed هلا شرحت ما تريد فعله بشكل واضح حتى نفهمك؟

[Agmcz]

السلام عليكم
لا علاقة للـ TabOrder و Tab بما تبحث عنه.
يكفي لتحديد Item كما تقول أنت (Yes/No)

PHP كود :

RadioGroup1.ItemIndex := 0; 


لتعطيل Item الثاني (No)

PHP كود :

RadioGroup1.Buttons[1].Enabled:= False 


كل المكونات

PHP كود :

RadioGroup1.ItemIndex := 0;
RadioGroup1.Buttons[1].Enabled:= False;
RadioGroup2.ItemIndex := 0;
RadioGroup2.Buttons[1].Enabled:= False;
RadioGroup3.ItemIndex := 0;
RadioGroup3.Buttons[1].Enabled:= False;
RadioGroup4.ItemIndex := 0;
RadioGroup4.Buttons[1].Enabled:= False; 


بالتوفيق.

[S.FATEH]

السلام عليكم
اخ Raed عليك ببعض اساسيات دلفي
تصل لخصائص المكون عن طريق اسمه مثال RadioButton1 و ليس عن طريق TRadioButton انا وضعت الاكواد للتوضيح و ليس للنسخ و اللصق عليك ان تغير اسامي المكونات بما لديك في الفورم ...

[Raed]

شكرا اخي Agmcz الكود شغال مثل ما طلبت ولكن يجب علي البرنامج ان يعطل عمل احدى الخيارات تلقائيا عند التشغيل وليس عند الضغط على الخيارات
لا اعلم اذا كان هنالك EVENT محدد لهذا الشيء فانا قد وضعتها عند النقر OnClick وقمت بتجربه جميع خيارات ال EVENT ولم احصل على ما اريد اما الكود يعمل عند النقر على الخيار المحدد له بالتعطيل داخل الكود !

---

اعلم اخي فقد قمت بتطبيق ما قلته لي وتغير المتغيرات وتجربه كل شيء وسخه مثل ما هو لكن بعد كتابه 
RadioButton1 ومن بعدها نقطة يعطيني العديد من الخيارات وهذا الامر طبيعي لكن لا احصل على ما يسمى Enabled او حتى Tag
https://prnt.sc/s9obgd

[Agmcz]

السلام عليكم
يجب عليك تعلم أساسيات دلفي كما ذكر أخي فاتح

عموما يمكنك إستعمال الحدث OnCreate للفورم

PHP كود :

procedure TForm1.FormCreate(Sender: TObject);
begin
  RadioGroup1.ItemIndex := 0;
  RadioGroup1.Buttons[1].Enabled := False;
  RadioGroup2.ItemIndex := 0;
  RadioGroup2.Buttons[1].Enabled := False;
  RadioGroup3.ItemIndex := 0;
  RadioGroup3.Buttons[1].Enabled := False;
  RadioGroup4.ItemIndex := 0;
  RadioGroup4.Buttons[1].Enabled := False;
end; 


[Raed]

وعليكم السلام اخي شكرا تم حل المشكله بنجاح ، ان شاء الله راح اتعلم دلفي بالمستقبل بس حاليا عم اتعلم لغه دوت نت فهي منتشره بشكل اوسع ولكن لا غنى عن برنامج دلفي ففيه ميزات كثيره فلقد شاهدت برامج عديده ولم اصدق انها مبرمجه على دلفي  
سؤال اخر واكون قد انتهيت من مشروعي باذن اللله ويبقى لي عمل كراك ساحاول مشاهده بعض الفيديوهات او المواضيع داخل المنتدى بعد الانتهاء من البرنامج
اعتذر عن ازعاجكم ايها الاخوة فهل يمكن عمل تايمر بارجاع كلمة معينه داخل Label مثلا يوجد لدي كلمة معينه واريد تغيرها من خلال الضغط على احد ازرار الكيبورد وطباعه كلمة اخرى ، وبعد مرور 5 ثواني ارجاع الكلمة القديمة ؟تم برمجه كود يطبع الكلمة التي اريدها عند الضغط على الزر ولكن لا اعلم كيف ساعيد الكلمة القديمة بعد مرور عدد معين من الوقت

[Agmcz]

ماذا تريد أن تفعل بالضبط؟

[Raed]

لدي Label يوجد داخله كلمة معينه .. عند الضغط على احد مفاتيح الكيبورد يطبع الحرف الذي قمت بالضغط عليه فعلت هذا الشيء ولكن اريد عمل تايمر يقوم بارجاع الكلمة القديمة بعد 10 ثواني بمعنى انه كلما اضغط حرف بالكيبورد يطبعه على الليبل بدل الكلمة الاولى وبعد مرور وقت معين يرجع الكلمة الاولى

[Agmcz]

مرفق مثال يوضح لك ذلك
بالتوفيق.