Salah Al Deen

مشكور جداً أخ أبو هاني :D

يا ريت والله يأخ صالح تتكرم وتشرح لانه باين مطول هذا الأستبيان قبل ما يبدا أحد يعطي دروس

أرجو من الأخ محمد العنزي الزيادة في التوضيح حتى تعم الفائدة والسلام عليكم.:P

يمكنك أستخدام هذا الكود البسيط ويقوم بنفس العمل If not( Key in[ '0'..'9',#9,#8] )then Key:=#0; ولكى مني أطيب تحية:D ;)

يا أبو محمد جرب هذا الكود وأدعيلي :D procedure TForm1.Tock(TC:string;Sender: TObject); var Cou,g:integer;ء begin g:=0; for cou:=1 to length(Tc) do if (tc[cou]=' ')and(tc[Cou+1]<>' ') then inc(g);ة if tc[length(tc)]<>' ' thenص Label3.Caption:='عدد كلمات هذا الأ…

شكرا اخي الكريم FOX_DELPHI رعاك الله وحماك;)

السلام عليكم ورحمة الله وبركاته أرجو أن تقبلوني من ضمن فريق العمل مع العلم أني مبتدي في البرمجة بلغة الدلفي وقد لا أستطيع أن إفيدكم بشي ولكن أرغب أن أكون مع محترفين مثلكم حتي أتعلم كما ذكرتم سابقاً وأتمنى لكم التوفيق في عملكم سدد الله خطاكم.:D :D بريدي هو ( Sa…

:confused:

procedure TForm1.SpeedButton1Click(Sender: TObject); var x,y,d : integer; begin if d <> 1 then begin x := speedbutton1.Left+left; y := top + speedbutton1.Top-(PopupMenu1.Items.Count*16); popupmenu1.Popup(x, y); d := 1; end else begin d := 0; end; end; أرجو أن …

أشكرك أشكرك أشكرك لقد فهمت الأن تمام الفهم:D:D:D(f)(f)

السلام عليكم ورحمة الله وبركاته أرجو أن لا يكون ردي متأخراً و أتمنا من كل قلبي مثل هذه الدورات التي تزيد من قدرة المبتدي في فهم طرق البرمجة على لغة برمجة دلفي من تكوين قاعدة برمجية علمية صحيحة ودقيقة تمكنه من فهم وأستنباط العلاقات المنطقية للبرمجة وأنا اوأيد ه…

هل من الممكن أن تشرح لي كيف يمكن أن أجعل Enter تعمل وكيف يمكن أن أستفيد من قيم المفاتيح الموجودة بالملف فمثلا عندما أخوم بإرسال كلمة أنتر تطبع كما هي ولا أحصل على سطر جديد فما هو التعديل الدي يجب أن أتبعه.:confused:

السلام عليكم ورحمة الله وبركاته والله عاجبني فيك التواضع أستاد tmaaa وتقول أنك مش محترف يأستاد أنت حليت مشكلة دوخت الكثير الكثير من المبرمجين في بلدي وأنقذتني شخصياً من مأزق والله كل كلمات الشكر والدعاء ما توفيق حقك يأستادي العزيز أتمنا أن تقبلني طالب عندك فأر…

السلام عليكم ورحمة الله وبركاته أشكرك أخ tmaaa على أجابتك السريعة وأشعر بالفخر لوجود محترف مثلك يقدم يد العون والمساعدة لنا نحن المبتدئين فل البرمجة وجعل ذخر لنا وزادك الله علم فوق علم سوف أجل كل أهلي يدعون لك ولكن..................:( أطمع بأن تبسط علي الأمر ف…

السلام عليكم ورحمة الله وبركاته. أعزائي مبرمجي الدلفي أحييكم وأشعر بالفخر حين أتصفح هذا المنتدي الرائع سدد الله خطاكم ورعاكم أنا مبرمج مبتدي أضع قدمي على الخطوات الأولى من حياتي المهنية في عالم البرمجة ولقد وفقت في خطوتي الأولى بأختياري للغة الخاصة بالبرمجة ( …

السلام عليكم ورحمة الله وبركاته. أعزائي مبرمجي الدلفي أحييكم وأشعر بالفخر حين أتصفح هذا المنتدي الرائع سدد الله خطاكم ورعاكم أنا مبرمج مبتدي أضع قدمي على الخطوات الأولى من حياتي المهنية في عالم البرمجة ولقد وفقت في خطوتي الأولى بأختياري للغة الخاصة بالبرمجة ( …

:Dأخوتي وأخواتي رواد منتدى المبرمجين العرب أنا عضو جديد في هذا المنتدا ;) وإني سعيد لكوني أصبحت أحد أفراد عائلة هذا النتدى وفقكم الله ورعاكم أما بخصوص الموضوع فإني لا زلت أبحث في مكنونات النت لعلي إجد ما قد أفيد به وشكراً;)