romanof

بسم الله الرحمن الرحيم أخي العزيز ان الاجراء والدالة (procedure and function ) عبارة عن مجموعة من الاوامر التي يمكن إستدعاؤها من اماكن مختلفة من البرنامج عند استدعاء كل منهما (قد ) نرسل متغيرات أو ثوابت أوعبارات كبارامترت (كعوامل ) بحيث ان قيم هذه البارمترات س…

اشكر ثقتك منقطعة النظير انا الان ارتجف لا ادري من الحزن ام من الفرح اخي العزيز عروة هناك كثير من الاشياء التي لا اعرفها وهذا مش تواضع :s :s ولا اريد ان اذكر عيوبي بعدين انا لي زمان وانا حاسس بالمؤامرة بينك وبين سيف الدين :lol: :lol: اخي عروة انا ابذل كل ما بوس…

يبدو ان هناك شبه اجماع على مسالة التواجد لذلك لذلك لا تتردد كثيرا اخي عروة توكل على الله والشباب كل واحد فيهم احسن من الثاني

ممتاز . صحيح دع الخيزللخباز ولو اكل نصفه كنت متاكدا يا سيف الدين ان المنظومات مالها إلا انت ولو لم تتاخر امس لما تدخلت اساسا

Database1.Params.Add('PATH=C:\DELPHI\DEMOS\DATA'); ... end;

عفوا في المشاركة السابقة رايتم الجدول برمجيا وهذه هي Alias برمجيا procedure TForm1.Button1Click(Sender: TObject); begin Database1.DatabaseName:= 'MyNewAlias'; Database1.DriverName:= 'STANDARD'; Database1.Params.Clear; end;

انشاء قاعدة البيانات برمجيا procedure TForm1.Button2Click(Sender: TObject); begin with Table1 do begin Active := False; DatabaseName := 'MyNewAlias'; TableType := ttParadox; TableName := 'CustInfo'; { Don't overwrite an existing table } if not Table1.Exists th…

اضافة للقائمة الرئيسية Private procedure NewShortcutClick(Sender: TObject); … … procedure tform1.addmainitem(s:string); var newitem : Tmenuitem; begin newitem:=tmenuitem.create(Mainmenu1); newitem.caption:=s; mainmenu1.items.insert(mainmenu1.items.count,newite…

اسم الكتاب Algorithms المؤلف Robert Sedgewick الحجم 4.683 MB عدد الصفحات 560 الكتاب يتحدث عن الخوارزميات بشكل عام اذكر منها خورزميات انتاج الاعداد العشوائية والفرزوالبحث والبرمجة الديناميكية و خورزميات هندسية (صدقني راح تفيدك في برمجة الالعاب ) وهناك خوارزميات…

شف لي كم رؤيا من عندك بس حلوين

ربما بسبب مشاكل المنتدى في الفترة الاخيرة اصبر علي شوي :rolleyes: ملاحظة :يرجى عدم ذكر اسماء لان هذا قد يمنع البقية من الاجابة اولا :wacko: وممنوع في المنتدى وقد تغلق المشاركة بسبب هذا :wacko: :wacko:

عفوا تسرعت بإضافة الرد هل قصدت هذه القسمة c:= Value mod i; اذا كانت اجابتك بنعم فانت محق لان ال mod , div لايقبلان التعامل الا مع الاعداد الصحيحة اصلا عملية ايجاد باقي القسمة لا معنى لها إذا كنا نتعامل مع الاعداد الحقيقية (اعداد ذات علامة عشرية ) ادخل الhelp و…

غريب رغم ان هناك الدالة القياسية function FloatToStr(Value: Extended): string بالتالي ليس هناك من سبب اساسا لكتابة (تابعك الخاص ) يعني أن البارامتر الذي كنت سترسله الى تابعك ارسله الى التابع المبين اعلاه مثال ..... var value : Extended; procedure TForm1.Button…

ننتظر حتى تنجلي الأمور

شكرا السؤال واضح في الحقيقة انت محقة من الافضل استخدام الSQL ولكن لا افضل استخدام المكونات dbedit لمشاكلها الكثيرة احبذ استخدام المكونات edit اما كيفية عمل ذلك فاعتقد ان الكود التالي يوضح الامر Query2.SQL.Clear; Query2.SQL.Add('select MyGoods.GoodsCost,MyOrder…

وضحي السؤال لوسمحتي يا اختاه

ربما كان قصدك هو الفرق بين form1.visible := true; Show; الخاصية visible تدل على حالة المكون فاذا كانت true معناها ان المكون ظاهر او مختفي في الحالة false اعتقد انه لافرق بين العبارتين السايقتين لان المنهج show في الحقيقة يعدل قيمة الخاصية visible إلى true بينم…

تفضل اخي http://www.orwah.net/modules/newbb/viewtop...3#forumpost1123

الله يخلي لك عيونك شكرا :lol: :lol:

المؤلف Robert Sedgewick لم أستطع ارسال الكتاب لكبر حجمه لذلك فتحت بريد جديد في الياهو وارسلته اليه user Name adelsaleh3000000 PassWord romanof3000