najy_zl
خبير دلفي و مشرف سابق
- نوع غريب من الطباعة في دلفي
السلام عليكم... لا علاقة لتلك الملفات بالطباعة. هي فقط ملفات لحفظ تصاميم (مواصفات و محتويات) التقارير، و يمكن أن تكون بأي امتداد. هذه الملفات إما أنه تتم قراءتها بمكون (Component) جاهز، أو - ببساطة - بكتابة إجراء (Procedure) يقوم بقراءة الملف و إنشاء الـ Bands…
- ربط ثلاثة جداول اكسس مع بعضها
السلام عليكم... المعطيات غير كاملة! ما هي العلاقة بين الجداول الثلاثة؟ و ما هي الحقول التي تربط بينها؟ إذا أمكن التوضيح بمثال. و السلام.
- مشكلة في تفقيط مسار البرنامج
السلام عليكم... انسخ الكود التالي و ألصقه في صفحة كود الـ Form ثم شغل البرنامج: انسخ الكود Private Function ExtractFilePath ( ByVal APath As String ) As String Dim Index As Long Dim LastSlashPos As Long Dim AChar As String Dim ThePath As String ThePath = Trim …
- مشكلة في تفقيط مسار البرنامج
السلام عليكم... هذه مجموعة دوال كنت كتبتها من مدة لمعالجة الوصول إلى الملفات. انسخها و ضعها في وحدة برمجية (Module) و استخدم ما بلزمك منها: انسخ الكود ' الحصول على اسم الملف (و امتداده إذا كان موجوداً) من مسار محدد Public Function ExtractFileName ( ByVal APath…
- مشكلة في تفقيط مسار البرنامج
السلام عليكم... أرجو التوضيح: هل تقصد الحصول على مسار المجلد الذي يوجد به الملف؟ و السلام.
- هل استطيع الحصول على تاخير زمني اقل من 1 ملي ثانية ؟
السلام عليكم... نظرياً نعم! عملياً يعتمد على عتاد الحاسوب (Hardware) و سرعته. في المرفقات مشروع صغير يطبق ما ورد في الشرح السابق، وجدته في كومة الأكواد التي عندي و لا أذكر من أين حصلت عليه، لكنني أضفت إليه بعض التعديلات. High_Resolution_Timer.rar نرجو الاستفاد…
- كيف أجعل ال Index للمصفوفة نص ؟
السلام عليكم... هذه هي محتويات الوحدة Configs بعد إجراء التعديلات عليها. و هي الآن تدعم الأنواع String و Integer و Real (أو Float) و Boolean و TDateTime. و يمكن بتعديلات بسيطة أن تدعم أنواعاً أخرى. مع ملاحظة أني لم أقم بمراجعة الوظيفتين Reset و Remove. ملاحظة:…
- فصل الأحرف
السلام عليكم... جرب هذا الكود في الحدث KeyPress لمربع النص: انسخ الكود Private Sub Text1_KeyPress ( KeyAscii As Integer ) Dim NewChar As String Dim OldText As String If KeyAscii > 32 Then NewChar = Chr ( KeyAscii ) KeyAscii = 0 OldText = Trim $ ( Text1. Text )…
- كيفيه عمل تنسيق للتاريخ
السلام عليكم... تمت الإجابة على موضوع تعبئة الشجرة في نفس الموضوع. نرجو الاستفادة و السلام.
- رجاء معرفه تعبئه الشجرة من جدول واحد من قاعده اكسيس
السلام عليكم... الحقيقة لم أفهم المطلوب - لأنه غير موضح بالتفصيل - إلا بعد الاطلاع على المرفق الموجود في مشاركتك في هذا الموضوع. على أية حال، ضع هذا الكود في إجراء الزر: انسخ الكود procedure TForm1 . BitBtn1Click ( Sender : TObject ) ; var N , NParent : TTreeN…
- كيف أجعل ال Index للمصفوفة نص ؟
السلام عليكم... الفائدة من طرح المواضيع و الأكواد هي المناقشة و الوصول لأفضل الحلول. و طالما وصلنا إلى الفكرة فإنه يمكننا تعديلها و تطويرها بما يتناسب مع احتياجاتنا. أشكرك و أرجو لك التوفيق. و السلام.
- كيف أجعل ال Index للمصفوفة نص ؟
السلام عليكم... يمكن استعمال بعض الحيل، ليس كمصفوفة تماماً، و لكن لإنجاز ما فهمته من كود الأخ "أبو محمد اللحياني". في بداية القسم interface نقوم بتعريف الأنواع التالية: انسخ الكود TValueHolderArray = array of string ; TValueHolderMap = record AName : string ; …
- هذا البرنامج الى اخواني المبتدئين واستفسار اذا امكن
السلام عليكم... لا بأس بالبرنامج و منطقه سليم. لكنه يحتوي على خطأ في الحسابات عندما يكون شهر تاريخ الميلاد هو نفسه الشهر الحالي و يوم تاريخ الميلاد أكبر من اليوم الحالي. مثلاً إذا كان تاريخ اليوم هو 18/09/2009 و كان تاريخ الميلاد هو 20/09/1964 حيث ستظهر السنة …
- كيف يتم التحكم في برنامجي عن طريق اللمس الشاشه؟؟
السلام عليكم... التشغيل باللمس لا علاقة له بالبرمجة و إنما هو وظيفة ضمن تصميم الشاشة نفسها، أي أنه هناك شاشات لمس (Touch Screen) تتحسس للمس سطحها و يقوم النظام بتفسير تلك اللمسات كأنها نقرات بالفأرة (Click) - تصبح الشاشة وسيلة إدخال. و أي برنامج لديك سيعمل على…
- سحب نص من برنامج خارجي و فلته او لصقه في Edit
السلام عليكم... بالنسبة إلى Delphi 2007 الأمور تمام و الكود يعمل بشكل صحيح (عربي و لاتيني). للأسف لا أملك إصدارات أحدث من دلفي 2007 كي أحاول التجربة. نرجو إذا تم الوصول إلى الحل أن يتم ذكره هنا حتى نستفيد. بالتوفيق و السلام.
- سحب نص من برنامج خارجي و فلته او لصقه في Edit
السلام عليكم... أحببت فقط أن أشكر الأخ زكيري عبد العالي على الموضوع، و الأخ حسين طي على التصحيح (زر الشكر لم يعد موجوداً). فعلاً تمت العملية بنجاح بعد التصحيح. حتى النصوص العربية تظهر صحيحة. و السلام.
- كيف يمكنني احضار ملف ورد على الدلفي
السلام عليكم... شكراً للأخ djaballah75 على زيادة التوضيح لأني لا أفهم الفرنسية! كنت فعلاً أنتظر أحد الإخوة الجزائريين لتوضيح المسألة أكثر. إذا كان الأمر يتعلق بملف نصي (و ليس ملف وورد Word) فأعتقد أن الأمر بسيط: نضع على النافذة المكون Memo (من صفحة المكونات St…
- كيف يمكنني احضار ملف ورد على الدلفي
السلام عليكم... الأخ/الأخت sabrina_1603... السؤال غير واضح (على الأقل بالنسبة لي أنا). و هذا هو سبب وجود 45 قراءة للموضوع دون وجود أي إجابة. الرجاء إعادة صياغة المطلوب بشكل أوضح. و السلام.
- مشكلة في طباعة نص عربي على الطابعة
السلام عليكم... ربما السبب هو أن الخط المعين للطابعة لا يدعم اللغة العربية، فليست كل الحطوط تدعم اللغة العربية. جرب كتابة السطرين التاليين قبل جملة Open (أو ربما بعدها) على اعتبار أن الطابعة التي تستعملها هي الطابعة الافتراضية (Default Printer) في النظام: انسخ…
- هل يمكن ربط ملفين اكسس بالفيجوال
السلام عليكم... نفرض أن قاعدة البيانات الأولى هي DB1.mdb و أن قاعدة البيانات الثانية هي DB2.mdb و بفرض أن الملفين موجودان في المجلد C:\My Documents و نفرض أننا نريد ربط الجدول TableX من القاعدة الأولى مع نفس الجدول (TableX) في القاعدة الثانية. في قاعدة البيانا…