newmember

مشكور جداً أخ tamee بالنسبة لملاحظة الأخ عنيزة فأنه لاأعتقد بوجود أى مشكلة فبإمكانك أن تضع أى شى على الصورة وستظهر بإذن الله بس لاتضع الأزرار مثلا على أى لون أبيض فى الصورة لأنه زى ماتشوف اللون الأبيض لايظهر . bye

هل قام أحد بتجريب هذا الكود ؟؟؟؟؟؟؟؟؟؟؟؟؟:(

إخوانى رواد هذا المنتدى الرائع السلام عليكم ورحمة الله وبركاته الكود التالى يقوم بإظهار الفورم فى أى شكل ممكن يخطر على بالك : unit Unit1; interface uses Windows, Classes, SysUtils, Graphics, Forms; type TRGBArray = array[0..32767] of TRGBTriple; PRGBArray = ^T…

رقم اللوحة الأم ؟ ماهو الكود الذى يعطينى هذا الرقم ؟ أرجوا المساعدة

it's not clear pls write by arabic bye

قمت بعمل منظومة مرتبات بالدلفى وهى تقريبا جاهزة لتسليمها للمستفيد حيث قمت بتركيب الدلفى على الإسطوانة C وأقوم بتخزين البرامج التى أكتبها على الإسطوانة D وسارت الأمور على أحسن مايرام وصدفة ذات يوم وبسبب مشكلة فى ال Windows قمت بعمل format للإسطوانة C وأعدت تركي…

هذا الكود لجعل لون الفورم متدرج procedure TForm1.FormPaint(Sender: TObject); var Row,Ht: word; begin Ht := (ClientHeight + 255) div 256; For Row := 0 to 255 Do With Canvas Do Begin Brush.Color := Rgb(Row,0,0); FillRect(Rect(0,Row*Ht,ClientWidth,(Row+1)*Ht)); e…

مشكور ياأخ madi وبارك الله فيك الحقيقة انك ماقصرت معاى وأتمنى لك التوفيق والنجاح(f)

السلام عليكم ورحمة الله وبركاته اليكم هذا الكود لكتابة نص مائل على الفورم سواء كان بالعربية ام بالإنجليزية procedure TForm1.FormPaint(Sender: TObject); var lf : TLogFont; tf : TFont; begin with Form1.Canvas do begin Font.Name := 'Arial'; Font.Size := 24; tf :=…

مشكور ياأخ madi تعرضت لمشكلة أخرى فأرجوا المزيد من المساعدة عندما أدخل التاريخ المطلوب وليكن مثلا "1/10/2001" حسب التنسيق dd/mm/yyyy فان النتيجة تكون حسب التاريخ "10/1/2001" أى حسب التنسيق mm/dd/yyyy وإذا أدخلت التاريخ مثلا "31/12/2000" أحصل على رسلة بالخطاء و…

شكرا جزيلا على الرد أخ madi وياريت توضحلى أكثر لأننى مبتدئ بالدلفى وأحتاج الى زيادة من الشرح وخصوصا حول تعريف params من النوع date كما ورد فى الرد وأين يمكن وضع هذا التعريف لأننى جربت ولم أفلح وكل العام والجميع بخير بمناسبة قرب الشهر الفضيل .

السلام عليكم ورحمة الله وبركاته الإخوة الأعزاء حاولت تكوين استفسار باستخدام حقل تاريخى باستخدام الكود التالى: Query1.close; query1.sql.add('select * form filename'); query1.sql.add('where fieldname = edit1.text'); query1.open; ولكننى احصل على رسالة خطاء وعندما…

الأخ madi شكرا على إهتمامك لقد جربت أنا أيضا هذه الطريقة #13 ولم ت}دى المطلوب . وسأرد أيضا إذا اهتديت إلى طريقة أخرى وشكرا مرة أخرى

أقصد أننى حاولت أن أزيد من إرتفاع الصف الحاوى للعنوان وليس العرض وشكرا مرة أخرى

السلام عليكم ورحمة الله وبركاته الإخوة الأعزاء بعد التحية,,, عندما اريد اظهار عنوان لحقل ما على Dbgrid باستخدام Displaylabel يظهر هذا العنوان فى سطر واحد وأحيانا يكون العنوان طويل بعض الشئ وبيانات الحقل تكون صغيرة فيبدو الشكل غير متناسق كيف يمكن أن أظهر العنوا…

السلام عليكم ورحمة الله وبركاته الإخوة الأعزاء هل بالإمكان تغيير إتجاه ال TStringGrid من اليسار الى اليمين وبالعكس ماهى الطريقة إذا كان ممكن وشكرا جزيلا للجميع

قمت بوضع الكود التالى tform1.create(self); فى معالج الحدث on create الخاص بال form2 وانتهت المشكلة. شكرا مقدما للجميع

السلام عليكم ورحمة الله وبركاته الإخوة الأعزاء أرجوا منكم الإجابة عن هذا السؤال البسيط أريد ان أفتح form1 أى اظهاره عندبدايةتشغيل المشروع باستخدام الأمرshow حيُث أن form2 هو الشكل الرئيسى للمشروع وضعت الأمر showmodal.form1; فى معالج الحدث on creat ل form2 ولكن…

شكرا أخ sami2000 لقد قمت بتجربة الإجراء على الدلفى 3 وقد اشتغل 100% مع تعديل بسيط جدا لمن اراد ان يجرب : If Components is TCustomEdit SendMessage((Components as TCustomEdit).Handle, التعديل هو وجود حرف i بين القوسين التاليين [ ] بعد components فىالسطرين السابق…

شكرا أخ sami2000 لقد قمت بتجربة الإجراء على الدلفى 3 وقد اشتغل 100% مع تعديل بسيط جدا لمن اراد ان يجرب : If Components is TCustomEdit SendMessage((Components as TCustomEdit).Handle, التعديل هو الموجودة فى السطرين السابقين اما باقى الإجراء فهو كما تفضل به الأخ …