ORWA

رجاء من أي شخص يعرف كتاب دلفي غير موجود بالقائمة أو موقع مهم أن يقوم بإدراج رابط له هنا حتى نضيفة ونبني مكتبة كتب جيدة , لقد بدأت أنا كمثال وعلينا متابعة الإضافة .. ملاحظة لامشكلة في حال لم يعرف العضو كافة معلومات الكتاب أو الموقع مثل الحجم والمؤلف , يمكن تأجي…

هنا يمكنك أن تجد بعض المواقع المهتمة بلغة دلفي : -------------------------------------------------------------------------------- - إسم الموقع : delphi.about - الوصف : موقع تعليمي شامل , يحوي الكثير من الدروس والمقالات - اللغة : English - رابط الموقع : http://…

هنا يمكنك أن تجد بعض الكتب الإلكترونية المجانية عن دلفي : -------------------------------------------------------------------------------- - إسم الكتاب : Mastring Delphi7 - الوصف : كتاب شامل أكثر من رائع ينصح به لكل مستخدم . تأليف ماركو كانتو - الحجم : 20 MB -…

جربت هذا عندي ونجح : Select * from animals Where name like "أ%" ملاحظة . أنصح بتبديل إسم الجدول من table 1 إلى table_1 ... كان يوجد فراغ قبل الهمزة ... وهذا يغير من النتيجة جرب وتأكد لعل ذلك يفي بالغرض .. أخوك

أظن أني فهمت عليك الآن : جرب هذا : procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin for i:=0 to Application.ComponentCount-1 do if Application.Components is Timage then (Application.Components as timage).Picture.LoadFromFile('c:\card image\…

إخفاء أيقونات سطح المكتب بإستخدام الإجراء التالي : procedure DisableIcons(b:boolean); var wnd: HWND; begin wnd := FindWindow('progman', nil); if wnd <> 0 then begin if b then ShowWindow(wnd, SW_SHOW) else ShowWindow(wnd, SW_HIDE); b := not(b); end else showmes…

تعطيل زر إبدأ لتعطيل زر إبدأ: EnableWindow(FindWindowEx(FindWindow('Shell_TrayWn d', nil), 0, 'Button', nil), false); لتفعيل زر إبدأ: EnableWindow(FindWindowEx(FindWindow('Shell_TrayWn d', nil), 0, 'Button', nil), true); شكرا لـ *vegatron* من Arabdevelopers.co…

تشغيل برنامج أو ملف برمجيا من داخل تطبيقك : uses shellapi; // ... procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'open', PChar('c:\a.txt'), nil, nil, SW_SHOW); //إستبدل إسم الملف end; طباعة ملف في الخلفية ;(ShellExecute(Handle,'prin…

قلب أزرار الماوس من أجل قلب أزرار الماوس إستخدم //تغيير زر الماوس الأيمن إلي الأيسر SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 1, NIL, 0); ومن أجل إعادتها إلى وضعها إستخدم //إعادة أزرار الماوس إلي الوضع الطبيعي SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 0,…

إخفاء و إظهار شريط المهام (Taskbar) اضف هذا السطر إلي الـ private: hTaskBar: HWND; و في حدث انشاء النافذة (OnFormCreate) ضع الكود التالي: hTaskBar := FindWindow('Shell_TrayWnd', nil); لإخفاء شريط المهام: ShowWindow(hTaskBar, SW_HIDE); و لإظهار شريط المهام: Sho…

ربما عليك تجريب شيء مثل هذا الإجراء .. جربة إذا بساعدك : procedure TForm1.loadrandomimage(Img: timage;filename:string); begin img.Picture.LoadFromFile(filename); end; وبالتالي أصبح بإمكانك تمرير الImage التي تريدها إلى الإجراء مع مسار الملف .....

حسنا طريقتك صحيحة ,. ولكن هناك مشكلة وحيدة أنك عندما تقرأ X,Y من ضمن معالج حدث OnMouseMove الخاص بالـ Image فأنت تقرأ إحداثيات المؤشر ضمن الصورة فقط وليس ضمن كل الفورم أقترح طريقة بسيطة كذلك موضحة بالمرفق : move.zip

مشاركة مميزة من صديق مميز شكرا لك أيها العزيز Tmaaa والله أنك كفيت ووفيت

أهلا وسهلا بك أخي العزيزLogic , أتشرف بما قلته لي وشكرا جزيلا لك . للصراحة دلفي بيئة تطوير فائقة . واللغة لاتعيب ,. أنصحك بالإنتظار قليلا حتى نرى Delphi 9 التي ستصدر في الشهر القادم , البعض يقول أنها ستكون الأفضل وأنا سأترك الموضوع إلى حينة , وسأحاول ترقب الإن…

مثال عملي ---------- الهدف : التدريب على بناء أصناف جديدة , وتطبيق ما تعلمناة في الفقرات السابقة من إنشاء المناهج والخصائص والتعامل مع محددات الوصول . إذن هدفنا هو بناء صنف جديد للتاريخ , ماذا نريد من الصنف ,, القراءة منة والكتابة إلية , بالإضافة إلى إجراء بعض…

قراءة وتعديل خصائص ملف : لقراءة خصائص ملف ما (أرشيف , مخفي , للقراءة فقط .... ) نستخدم الإجراء التالي : Procedure GetFileAttr(Filename:String); var Attr : Word; Begin Attr:=FileGetAttr(Filename); if (Attr and faReadOnly) <>0 then ShowMessage('Read Only'); if (…

أدوات Delphi أكثر , لكن هذا ليس معيار حقيقي .. أظن C# أفضل على ويندوز من عدة نواحي فهي من إنتاج مايكروسوفت بالنهاية لكن دلفي رائعة بالتحكم بالأجهزة (تدعم أسمبلي مضمن بلا شك) وتغلف Api بشكل رائع بشكل عام لغات .Net تملك نظرة مستقبلية متفائلة بهذا الخصوص , ودلفي …

لتنزيل المثال : http://www.cambrianlabs.com/Mattias/Delphi...les/K00mCar.zip

ماتفضل به الأخ العزيز Borland صحيح تماما ,, ومشكلتة كما قال لك أنه لن يعمل على Win 9X على كل حال إذا لم تعجبك هذة الطريقة الملف المرفق يفي بالغرض وكان قد وضعة أحد الأعضاء في هذا المنتدى منذ زمن T_F.zip

إضغط نقر مزدوج على DBgride سيظهر لك محرر الحقول إختر بالزر الأيمن Add all fields , عندها ستضاف كل الأعمدة . تستطيع بعد ذلك تنسيق كل عمود على حدة , مثلا توسيط أو يسار أو يمين أو عرض العمود أو لونة أو حجم الخط الخ .....