- القارئ الآلي(دعوة للتعاون الجماعي)
شكرا لك أخ Sakr188 على طرح الموضوع وإفراد مشاركه له .. حسنا سنقوم بإضافته إلى قسم المشاريع . وأصبح الآن مشروعنا الرسمي .. بصراحة المشروع بهذا الشكل كبير زيادة عن اللزوم , فهو أول مشروع فعلي وإذا لم ينجح فإننا سنعود مئة سنه للوراء ... "" أوووبسOOps"" لذلك خلينا…
- هل يمكن بناء لغة برمجة على الدلفي
منذ عده سنين كانت تراودني فكرة أننا لايمكن أن ننجح سوى بالبرامج التسويقيه السريعة , وأننا متخلفون جدا ومتأخرون , ولكن مع مرور الزمن لاحظت أن أننا لسنا كذلك . وأن أهم شيء هو الإرادة والعناد , لايجب أن نفقد الأمل ..... أنا سأحكي قصتي , نحن في سوريا أنفتحنا على ع…
- البحث و كل مايتعلق به
هذا المكون كنت قد أعددته .. وهو مفتوح المصدر راجع شفرته قد تستفيد منها . /index.php?showtopic=48026
- OOP in Delphi
الوراثة من أنماط موجودة : غالبا ما نحتاج لبناء نموذج مختلف قليلا من صنف موجود , بدلا من بناء صنف جديد من البداية , ربما نحتاج إضافة مناهج جديدة أو خصائص أو تعديل أخرى موجودة . نستطيع فعل ذلك بطريقتين , نسخ الشفرة من هناك ولصقها هنا . (يدل على ضعف خبرة بالبرمجة…
- أفكار سريعة
الحصول على جميع الملفات الموجودة في مجلد procedure TForm1.Button1Click(Sender: TObject); var SR : TSearchRec; S,sFilePattern : String; Begin sFilePattern := ExtractFileDir(ParamStr(0)) + '\*.*'; S := ''; if FindFirst(sFilePattern,faAnyFile,SR) = 0 then Begin w…
- Office Assistant v3.26 - package
رائع ...
- استدعاء صور على الفورم
بالإضافة إلى كلام أخي 2/11/2004 أولا : عليك معرفة كل الملفات الموجوده في المجلد , هذه شفرة بسيطة تمكنك من ذلك عدلها : procedure TForm1.Button1Click(Sender: TObject); var SR : TSearchRec; S,sFilePattern : String; Begin sFilePattern := ExtractFileDir(ParamStr(0)…
- دعوة للعمل الجماعي
أبوعمر : هذا الكلام ناتج عن خبره كبيرة بالأعمال العربيه ... والله بعرف , يعني نحنا إذا نجحنا بشي عمل جماعي مامنكون عرب أصليين ...... بس أنا ناوي بمساعدة الشباب أنو نغيير هالصورة , وبدنا همتك معنا ملاحظة كمان ولو كان فيها إزعاج زاهر : قسم بناء المكونات جديد وبح…
- هل يمكن بناء لغة برمجة على الدلفي
لقد وضعتها في هذا الرابط ... /index.php?showtopic=51402 إنه مجرد برنامج قادر على إنتاج ملفات قابله للتنفيذ , وربما يمكننا تطويره على الأقل لعدة مراحل للأمام .
- دعوة للعمل الجماعي
جرب إضافه ملف الDll هذا إلى نفس المجلد fmod.zip
- دعوة للعمل الجماعي
إذا كنتم تقصدون Text To Speach Engine ... حسنا لقد سهرت اليوم شوي (كذب لسا الساعه 11.30) وأكملت فكره كنت قد بدأت بها ... والنتائج والحمد لله مبهره قياسا لزمن تطوير المشروع .. حسنا الملف المرفق هو برنامج ناطق باللغة العربية وضعت أسسه ونفذته في فتره قصيرة .. وهو…
- arabic treeview
الأخ fares_sa شكرا لمساهمتك القيمه , سأضطلع على الموضوع . الأخ mohfa هل تظهر نافذة حول على شكل فورم أنت وضعته . أم على شكل فورم يولد عند النقر عليها (ديناميكيا ) أم على شكل رساله Showmessage .
- arabic treeview
ملاحظة ... إسمي عروة والكنيه هي عيسى ... ولايهمك ...
- arabic treeview
باركك الله .. أنا فخور بوجودك بيننا ... وأتمنى ان تواصل دعمك للغتنا العربية والتي نحن مقصرين جدا في دعمها .. (مع أنني أفضل من غيري وطورت مكونين بسيطين هما ArMan و ArabicFindar) على الأقل وسأبدأ بإعداد نسخه مطوره منهما قريبا وأنشرها هنا مع الشفرة . وين الشباب ا…
- البحث عن سلسله محرفية ضمن سلسله أخرى
السبب أنني أستخدم Delphi 7 والتي تملك PosEX مباشرة
- البحث عن سلسله محرفية ضمن سلسله أخرى
أضيفي شفره الأخ tmaaa في المشروع ثم عودي وأستخدمي طريقتي .. مثلا تصبح كالتالي : var n:integer; function PosEx(const SubStr, S: string; Offset: Cardinal = 1): Integer; var I,X: Integer; Len, LenSubStr: Integer; begin if Offset = 1 then Result := Pos(SubStr, S) …
- البحث عن سلسله محرفية ضمن سلسله أخرى
أي أنك تريدين البحث عن سلسله محرفية ضمن سلسله أخرى . إستخدمي التعليمة Pos(Substr,Str) التي تعيد لك ترتيب (موقع) السلسله الجزئية في السلسه الأصلية إذا وجدت وإلا تعيد صفر . وتوجد تعليمة محدثه عنها هي PosEx , وهي تملك بارامتر يسمح لنا بتحديد مكان البدء بالبحث , م…
- دعوة للعمل الجماعي
ماهو هذا البرنامج ؟
- Borland Delphi 2005 Architect
شكرا لك HMS .. (هذا الملف هو كراااك نسخة Borland Delphi 2005 .. )
- طريقة جديدة لتحسين مستوى المنتدى
دلفي بايبل .. وين ؟؟