- كيف أتعلمMicrosoft SQL
تعتبر Ms Sql Server من أهم RDBMS (نظم إدارة قواعد البيانات العلائقية ) وبرأيي الشخصي أنها تتنافس مع Oracle لتحقيق لقب أهم RdBMS مع أني ميال لـ Oracle أكثر . على كل حال طريقة الوصل مع MS sql server من دلفي في غاية البساطة . وهي تماما كما تصل قاعدة بيانات أكسس و…
- أفكار سريعة
إظهار مربع حوار تغيير أيقونة : function PickIconDlgA(OwnerWnd: HWND; lpstrFile: PAnsiChar; var nMaxFile: LongInt; var lpdwIconIndex: LongInt): LongBool; stdcall; external 'SHELL32.DLL' index 62; procedure TForm1.Button1Click(Sender: TObject); var FileName: arr…
- اشلون اخلي برنامجي يشتغل عند الكل
أهلا بك صديقي Delphi team أتمنى حضورك القريب. أنا كذلك لدي مشاكل وقت مع جامعتي ,وشغلي . يسببان إبتعادي عن الإنترنت قليلا . أهلا بعودتك
- تعرف على قواعد بيانات FireBird
الله عليك أبو محمد .. يعني للصراحة موضوعك رائع . شكرا لك
- اشلون اخلي برنامجي يشتغل عند الكل
بمجرد تنفيذ البرنامج مرة واحدة .. أو ترجمتة (Ctrl+F9) ستحصلين على نسخة تنفيذية يمكنها العمل على أي جهاز . بعد الإنتهاء من عمل المشروع وتجربته إبحثي بين ملفات المشروع على ملف جديد إسمة نفس إسم المشروع وإمتدادة EXE . ويمكنك نسخ هذا المشروع لوحدة ليعمل على اجهزة …
- تساؤلات في ال DBGrid
من أجل السؤال التاني عند إنشاء الجدول OnCreate ضع Table1.insert وعند الإغلاق OnClose ضع Table1.cancel (للتأكد من إغلاق حالة الإضافة) وبالتأكيد ضمن زر الحفظ ضع table1.post . أتمنى أن أكون فهمت قصدك ... أخوك
- تساؤلات في ال DBGrid
أخي العزيز .. طريقتك صحيحة . أنك يجب أن تضيف حقل حسابي ولكن شفرة حساب الحقل الحسابي لا نضعها في الـ DBgride ستجد ضمن أحداث الجدول الحدث OnClacFields . وضمن هذا الحدث تضع شفرة حساب الحقل الجديد , وستقوم دلفي تلقائيا بكل العمل عوضا عنك ... مثلا الكود tblAttendan…
- أفكار سريعة
حساب سرعة المعالج إستخدم الإجراء التالي Uses Windows; function GetCPUSpeed: Double; const DelayTime = 500; // measure time in ms var TimerHi, TimerLo: DWORD; PriorityClass, Priority: Integer; begin PriorityClass := GetPriorityClass(GetCurrentProcess); Priority…
- أفكار سريعة
إخراج وإغلاق السواقة الليزرية إستخدم الإجرائين التاليين : Uses Windows, MMSystem; procedure EjectCDROM; begin mciSendString('Set cdaudio door open wait', nil, 0, GetDesktopWindow); end; procedure CloseCDROM; begin mciSendString('Set cdaudio door closed wait', …
- أفكار سريعة
تغيير خلفية سطح المكتب من الدلفي إستخدم الإجراء التالي : Uses Windows; procedure ChangeWallpaper(Bitmap: string); begin SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, Pchar(Bitmap), SPIF_UPDATEINIFILE); end; شكرا لـ Jazarsoft.com
- أفكار سريعة
تحويل الصورة من BMP إلى JPG : أضف الوحدة JPEG : uses JPEG ثم ضع هذا الكود في المكان المناسب var jpg:TJPEGImage; begin jpg:=TJPEGImage.Create; with jpg do begin Assign(Image1.Picture.Bitmap); SaveToFile('my jpeg.jpg'); end; end; شكرا لـ Justnick (ملتقى المبرمجي…
- أفكار سريعة
تحويل الكتابه عربي>أنكليزي وبالعكس للتحويل إلى اللغة العربية : LOADKEYBOARdlayout('00000401',klf_activate); للتحويل إلى اللغة الإنكليزية : LOADKEYBOARdlayout('00000409',klf_activate); شكرا لـ جيمس بوند 007 (ملتقى المبرمجين العرب)
- أفكار سريعة
كيفية إظهار مربع الإتصال بإنترنت وكيفية إختبار إذا كنا متصلين بإنترنت أو لا أولا أضف الوحدة WinInet مع الوحدات : USES WinInet; ثم أكتب التابع التالي function InternetConnected: Boolean; CONST INTERNET_CONNECTION_MODEM = 1; // local system uses a modem to conne…
- أفكار سريعة
كيف تبحث عن تطابق جزئي بإستخدام تعليمة Locate : مثلا يمكننا البحث حسب بداية كلمة ما , حيث يكفي كتابة الأحرف الأولى من الإسم لإظهار نتيجة السجل . مثال يكفي كتابة "عرو" لإظهار سجل الموظف "عروة" if not ClientDataSet1.Locate('F_Name',edit3.Text,[loPartialKey]) the…
- أفكار سريعة
كيف تبحث في أكثر من حقل بإستخدام تعليمة Locate : يمكن البحث بإستخدام تعليمة Locate في أكثر من حقل بحيث نبحث عن الموظف حسب حقل الإسم الأول و حقل الإسم الثاني . فإذا كان حقل الإسم الأول F_name والإسم الثاني L_name والقيم في Edit1 و Edit2 على التوالي أمكننا ببساط…
- أفكار سريعة
قمت بكتابة هذا الموضوع كتجربة يجتمع فيها الأخوة في المنتدى لتبادل بعض الأفكار السريعة والصغبرة التي تكون في كثير من الأحيان أكثر من مهمة , وسأحاول أن أضع بعض المشاركات تباعا , وكلي أمل من بقية الأخوة أن يشاركوني تبادل المعلومات كي تعم الفائدة لجميع رواد المنتد…
- المساعده في تعلم دلفي
توجد بعض كتب ومواقع دلفي هنا : /index.ph...pic=12506&st=75
- معا ضد قرصنة البرامج
أحييك . أنا معجب بفكرتك , مع أني أحيانا أحب الهاكرز الذين يحاولون كسر برامج الشركات الرأسمالية الكبيرة لتوفير نسخة منها للفقراء مثلنا .. ولكن رغم ذلك كسر البرامج حالة لا أخلاقية ولا يمكن القبول بها ,,, كنت قد أعددت مقالة سيئة عن موضوع مشابه , لكن ربما توجد بها…
- تجربة فقط لمشاركتي في منتداي المفضل
أهلا بك أخي باتي (زكيري سابقا) أنا جدا سعيد بعودتك , وأتمنى مشاركتك الفاعله , أهلا ومرحبا بك , في منتداك.
- برمجة برامج القرآن
حيث أقوم بعمل Capture لجزء من الصورة Gif ???? لو توضح لنا أكثر ماذا تقصد ؟؟؟؟ هل يمشي الحال إذا تعمالت مع أداة لعرض ملفات GIF ؟؟؟؟ عذرا منك أخي , فانا لم أفهم ما هو المطلوب بالتحديد , .