source code

السلام عليكم لم استطع عمل تجارب بسبب عدم وجود SMTP لدي .. و الـــ EncodeHeader : function اعتقد تسطيع استخدامها بالطريقة التالية : اضف الوحدة IdCoderHeader وجرب : var Tr: TTransfer; Cs: CSET; begin Tr := bit8; IdMessage1.From.Name := EncodeHeader('From', Cs, '…

قرآت موضوعك اول ما طرحتة .. وحاولت مساعدتك .. لكن للأسف لم اجد حل واضح الليلة ان شاء الله ... ابحث معاك على رواقة عن حل مناسب ... والزملاء هنا ان شاء الله ما يقصرون معاك وللمعلومية .. مشكلتك يعاني منها الكثير من اللغات .. عربي .. كوري .. روسي .. الخ

وعليكم السلام جزاك الله خير على هالدعوة الطيبة .. بارك الله فيك ما ادري لية .. عندي احساس انك ما جربت اللي قلت لك في ردي السابق ... "DateUtils" المهم ولا يهمك .. شوف المرفق .. وان شاء الله يفيدك . c_vita.rar

السلام عليكم كود الأخ cipher اوصلني الى طريقة .. وهي ان تحول الصورة الى TMemoryStream ... Stream ومن ثم تحفظ الــ Stream في Text File ... مهم تخزين الــ Stream في Text File .. غالبآ لن تنجح مع Memo او RichEdit و لعرض الصورة تعمل العكس .. وهذة تجربة : procedure…

طرف الخيط هنا : DateUtils اضف DateUtils الى الــ uses وشوف ايش فيها ... وراجع لك في وقت ثاني ... لكن حاول انت الأن .

هذا رابط مشروع الناطق الصوتي في قسم الدلفي : /index.php?showtopic=51923

bachirk ما شاء الله عليك قرآت الموضوع قبل لا تضع انت جوابك ... وكتبت كود يعطي نفس النتيجة لكن الحمد للة انك وضعت جوابك قبلي ... لو شفت طريقتي راح تضحك لمدة شهر متواصل واحتمال ادارة المنتدى يطردوني .. ويعتبروني عااااااااار على مبرمجين الدلفي .. : ) تخيل .. بعد …

اقصد في الرن تايم في حدث اون كرييت ... اكتب النصوص المهم لا تكتبها في الخصائص .

hazzoom خليك شجاع وجرب مثلي .. :P تصدق .. اول حاجة جت في بالي .. هي اللي انت فكرت فيها .. علشان كذا نزلت البرنامج اجربة .

شكرآ لك يا باسم لو ارفقت السورس لكان افضل .. خصوصآ انة برنامج غير تجاري وصغير .. حتى نستفيد منة وبما ان برنامجك صغير ... ضع النصوص في Const كي تضهر الكتابة العربية الأن انا اشاهد ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ .؟؟؟؟؟؟؟؟؟؟؟؟ فقط .. لأن جهازي انجليزي ... مع انة يدعم العربي فق…

وعليكم السلام يوجد اكثر من طريقة اخي نسيم يوجد ادوات خاصة ... ويوجد اكواد جاهزة .. على سبيل المثال : http://www.swissdelphicenter.ch/torry/showcode.php?id=2135 http://www.swissdelphicenter.ch/torry/showcode.php?id=1215 http://www.swissdelphicenter.ch/torry/sho…

cipher سم طال عمرك .. انت تأمر آمر .. ومن الأن No more personal chat .. : ) HacSec العمدة cipher يقول اي شي على كيفة ... انتبة تزعلة او ترد علية رد مش ولا بد ... هذا استاذنا ومن مؤسسين المنتدى وجرب اللي قال لك : try ... except .

اهلآ البرنامج اخوي محمد طرح قبل كم سنة ولا اذكر بالضبط اين ..هنا او في المبرمجون العرب لكن الأكيد ان البرنامج كان لة قسم خاص في موقع الأخ سيف http://saifsoft.com مع السورس و شرح كامل والأخ سيف معروف ومن المبرمجين المتميزين ...وكان يكتب هنا وفي المبرمجون العرب …

هههههههههههههه يا ويلك من الله ... عشرة الاف يا مجرم على هالشغلة البسيطة شوف اذ%

هههههههههههههه يا ويلك من الله ... عشرة الاف يا مجرم على هالشغلة البسيطة شوف اذا ما تبي الله يعاقبك حول الفلوس كلها لي .. : ) شغلة النص بالنص هذي ما تمشي معي . . . . . الأكيد الله يرزقك .. وتستاهل اكثر

هذي تسرع البرنامج .. وتحمية من الهكر ... هههههههههه يا حبي لك يا HacSec هذي Label ...يطلع لك الناتج فيها حطيتها لك علشان تعرف ان ما فية داعي الى الـــ Edit لأني شفتك تعرف المتغيرات d,e,f,g من الـــ Edit وانت ما تحتاج هالكلام المهم الأن عندك مشكلة في الكود ولا …

اكتب البتاع كذا : procedure TForm1.Button1Click(Sender: TObject); var a, b, c, d, e, f, g: Real; begin a := StrTofloat(Edit1.text); b := StrTofloat(Edit2.text); c := StrTofloat(Edit3.text); //----------- d := a * 0.35; e := a * b; f := e / d; g := e / (c * 0.2…

مبرووووووووووك طلعت الصورة يعني لا تكون الـــ Edit فاضية ... لازم تكتب فيها ارقام قبل لا تعمل اي عملية حسابية ولا يكون الرقم صفر ... لأن الأعداد لا تقبل القسمة على صفر .

عدل الخطاء في المتغير : var a, b, c, d, d, e, f, g; real; الى : var a, b, c, d, e, f, g: real; وتأكد ان الـــ Edit ليست فارغة او القيمة = 0 والى الأن الصور ما تطلع .. : )

السلام عليكم للأسف الصور ما تطلع يا HacSec وجرب هذة الطريقة : procedure TForm1.Button1Click(Sender: TObject); var x1, x2, x3, xx1, xx2, xx3, xx4: Currency; begin x1 := 0; x2 := 0; x3 := 0; //----------- xx1 := x1 * 0.35; xx2 := x1 * x2; xx3 := xx2 / xx1; xx4 :…