اشترك في قناتنا ليصلك جديدنا

اشترك في قناتنا على اليوتيوب ليصلك جديدنا

كذلك الاعجاب بصفحتنا على الفيسبوك

اقدم لكم بعض اكود لغة الدلفي

اقدم لكم بعض اكود لغة الدلفي


صفحة 1 من 2 12 الأخيرةالأخيرة
النتائج 1 إلى 10 من 16

الموضوع: اقدم لكم بعض اكود لغة الدلفي

  1. #1
    هكر مبتديء Array
    تاريخ التسجيل
    Jan 2010
    الدولة
    ليبيا طرابلس
    المشاركات
    6

    افتراضي اقدم لكم بعض اكود لغة الدلفي



    اقدم لكم بعض الافكار من خبرتي في البرمجة

    لتحميل الكتاب كامل من
    من هنا
    http://www.aljyyosh.com/vb/attachmen...1&d=1262629311
    خوئص الكتاب

    كيف تبحث في أكثر من حقل بإستخدام تعليمة Locate :

    يمكن البحث بإستخدام تعليمة Locate في أكثر من حقل بحيث نبحث عن الموظف حسب حقل الإسم الأول و حقل الإسم الثاني . فإذا كان حقل الإسم الأول F_name والإسم الثاني L_name والقيم في Edit1 و Edit2 على التوالي أمكننا ببساطة كتابة الشفرة التالية :

    SQL

    if not ClientDataSet1.Locate( 'F_Name;L_Name',vararrayof([edit1.Text,Edit2.Text]),[]) then
    showmessage( 'Filed Not Found');



    ويتم ذلك بفصل الحقول المراد البحث فيها بفاصلة منقوطة , وفصل القيم بإستخدام الدالة VarArrayOf



    كيف تبحث عن تطابق جزئي بإستخدام تعليمة Locate :

    مثلا يمكننا البحث حسب بداية كلمة ما , حيث يكفي كتابة الأحرف الأولى من الإسم لإظهار نتيجة السجل . مثال يكفي كتابة "عرو" لإظهار سجل الموظف "عروة "


    كود

    if not ClientDataSet1.Locate('F_Name',edit3.Text,[loPartialKey]) then
    showmessage('Filed Not Found');

    ويتم ذلك بإستخدام الخيار [loPartialKey] الذي يحدد التطابق الجزئي للبحث



    كيفية إظهار مربع الإتصال بإنترنت
    وكيفية إختبار إذا كنا متصلين بإنترنت أو لا

    أولا أضف الوحدة WinInet مع الوحدات :



    SQL

    USES
    WinInet;



    ثم أكتب التابع التالي



    SQL

    function InternetConnected: Boolean;
    CONST
    INTERNET_CONNECTION_MODEM = 1; // local system uses a modem to connect to the Internet.
    INTERNET_CONNECTION_LAN = 2; // local system uses a local area network to connect to the Internet.
    INTERNET_CONNECTION_PROXY = 4; // local system uses a proxy server to connect to the Internet.
    INTERNET_CONNECTION_MODEM_BUSY = 8; // local system's modem is busy with a non -Internet connection.
    VAR
    dwConnectionTypes : DWORD;
    BEG IN dwConnectionTypes : =
    INTERNET_CONNECTION_MODEM +
    INTERNET_CONNECTION_LAN +
    INTERNET_CONNECTION_PROXY;
    Result : = InternetGetConnectedState(@dwConnectionTypes,0);
    END;



    من أجل فتح مربع الإتصال بإنترنت أكتب الشفرة التالية :



    SQL

    procedure TForm1.Button1Click(Sender: TObject);
    beg in if not InternetAutodial(INTERNET_AUTODIAL_FORCE_ONLINE, Application.Handle) then
    MessageDlg( ' لايوجد إتصال ', mtError, [mbOk], 0);
    end;


    من أجل إختبار إذا كنا متصلين بإنترنت أو لا :



    SQL

    procedure TForm1.Button2Click(Sender: TObject);
    beg in if InternetConnected then
    showmessage( ' متصل حاليا بإنترنت ')
    else beg in showmessage( ' غير متصل بإنترنت ');
    InternetAutodial(INTERNET_AUTODIAL_FORCE_ONLINE, Application.Handle);
    end;
    end;




    تحويل الكتابه عربي > أنكليزي وبالعكس

    للتحويل إلى اللغة العربية :



    كود

    LOADKEYBOARdlayout('00000401',klf_activate);



    للتحويل إلى اللغة الإنكليزية :



    كود

    LOADKEYBOARdlayout('00000409',klf_activate);





    تحويل الصورة من 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;

    الملفات المرفقة الملفات المرفقة


  2. #2
    هكر مبتديء Array
    تاريخ التسجيل
    May 2010
    المشاركات
    7

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    مشكوووووووووووووووووووووو وووووووووووووووووووور


  3. #3
    هكر مبتديء Array
    تاريخ التسجيل
    Dec 2009
    المشاركات
    21

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    procedure TForm1.Button1Click(Sender: TObject);
    beg in if not InternetAutodial(INTERNET_AUTODIAL_FORCE_ONLINE, Application.Handle) then
    MessageDlg( ' لايوجد إتصال ', mtError, [mbOk], 0);
    end;



  4. #4
    هكر مبتديء Array
    تاريخ التسجيل
    May 2010
    المشاركات
    7

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    يعجز اللسان عن شكر مجهوداتك الكبيره يعطيك الف عافيه


  5. #5

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    كفوووو مبدع
    واصل تميزك
    في انتظار جديدك


  6. #6
    هكر مبتديء Array
    تاريخ التسجيل
    Jul 2010
    المشاركات
    48

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    مشكور يالغالي



  7. #7
    محظور Array
    تاريخ التسجيل
    Nov 2010
    المشاركات
    843

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    يعطيك العافيه واصل نشاطك


  8. #8
    هكر مبتديء Array
    تاريخ التسجيل
    Nov 2010
    المشاركات
    7

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    بالتوفيق والى الامام


  9. #9
    هكر مبتديء Array
    تاريخ التسجيل
    Jan 2011
    المشاركات
    4

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    يعطيك العافيه



  10. #10
    هكر مبتديء Array
    تاريخ التسجيل
    Dec 2009
    المشاركات
    8

    افتراضي رد: اقدم لكم بعض اكود لغة الدلفي

    شكرا لك اخي الفاظل


صفحة 1 من 2 12 الأخيرةالأخيرة

المواضيع المتشابهه

  1. كتاب تعلم الدلفي بالعربية
    بواسطة طائر العنقاء في المنتدى قسم لغة الدلفى
    مشاركات: 62
    آخر مشاركة: 05-06-2012, 03:59 PM
  2. اقدم لكم الصور الترفهيه 2
    بواسطة Snake HaCkEr في المنتدى المنتدى العام
    مشاركات: 8
    آخر مشاركة: 08-22-2011, 01:54 AM
  3. اقدم لكم لعبة : matrix
    بواسطة Snake HaCkEr في المنتدى منتدى الالعاب - تحميل العاب
    مشاركات: 7
    آخر مشاركة: 01-23-2011, 05:34 AM
  4. اقدم لكم الصور الترفهيه 5
    بواسطة Snake HaCkEr في المنتدى المنتدى العام
    مشاركات: 9
    آخر مشاركة: 03-18-2010, 01:31 PM
  5. اقدم لكم الصور الترفهيه 3
    بواسطة Snake HaCkEr في المنتدى المنتدى العام
    مشاركات: 2
    آخر مشاركة: 08-24-2009, 10:17 AM

وجد الزوار هذه الصفحة بالبحث عن:

البحث في دلفي

اكواد لغة دلفي

كود بحث في دلفي

البحث في الدلفي

اكواد لغة الدلفي

كودات دلفي

الكتابة بالعربية في الدلفي

تعليمات دلفي

البحث في دالفي

اكواد لغه الدلفي

كيفة تحميل صورة من نوع jpge في برمجة دلفي

كودات الدلفي

البحث حسب التاريخ في دلفيكود دلفي كيفية بحث في السجلاتبحث في الدلفيطريقة البحث في دلفيكود الطباعة بلغة الدلفياكود دلفياكواد علي لغة دلفيكيفية البحث في دلفيكفية الكتابة بالعربية في الدلفي 6اكواد بحث دلفيادخال التاريخ في الدالفيطريقة ادخال التاريخ لدلفيالكتابة بالعربية في الدلفي 7

المفضلات

أذونات المشاركة

  • لا تستطيع إضافة مواضيع جديدة
  • لا تستطيع الرد على المواضيع
  • لا تستطيع إرفاق ملفات
  • لا تستطيع تعديل مشاركاتك
  •