kachwahed

وعليكم السلام ورحمة الله وبركاته مثالك صحيح حالة استخدام متغير Integer var n: Integer; t1, t2, t3: real; begin table1.open; n := Round(table1.fieldvalues['Montant']); case n of 0..1000: t1 := n; 1001..2000: t2 := n; end; end; وإلا الشروط: if (n >=0) and (n <=1…

وعليكم السلام ورحمة الله لم أفهم جيدا، ممكن مثال؟

وعليكم السلام ورحمة الله وبركاته قبل التعامل مع المؤشرات يستحسن فحصها بمجرد توقع أنها يمكن لا تؤشر على شيء جرب: if Assigned(pdata) then pdata^.Caption := DM.QrAcc.Fields.FieldByName('name_acc').AsString; وكذلك مع كل متغير يثير استثناء مشابه بالتوفيق.

طريقة أخرى: procedure TForm1.CheckBox1Click(Sender: TObject); var I: Integer; begin Memo1.Lines.Clear; for I := 0 to ControlCount-1 do if (Controls is TCheckBox) then with (Controls as TCheckBox) do if Checked then Memo1.Lines.Add(Caption); Memo1.Lines.Delimit…

وعليكم السلام ورحمة الله وبركاته برأيي أن أفضل طريقة لذلك باستخدام TDBRadioGroup المرفق مع دلفي 7 على الأقل حيث تقوم بتهيئة المكون كالآتي: في الخاصية Item تكتب القيم التي تريد أن يراها المستخدم في الخاصية Values تكتب القيم التي تريد تخزينها في الجدول بالترتيب …

وعليكم السلام ورحمة الله "كود البرنامج صحيح لتفعيل البرنامج" اقترح استخدام برنامج حماية جاهزة RLPack له نسخة مجانية: http://reversinglabs.com/products/RLPack.php بالتوفيق.

وعليكم السلام ورحمة الله وبركاته هي مكونات مرفقة مع نسخة دلفي 7 على الأقل: http://delphi.about.com/od/vclusing/l/aa052403a.htm قد لا تكون مثبة على نسختك: http://stackoverflow.com/questions/578241/where-is-tshelllistview-in-delphi-2009 التعامل معها سهل جدا مثله…

وعليكم السلام ورحمة الله وبركاته أهلا صديقي :) بعد أن تربط TDirectoryListBox من خلال الخاصية FileList مع المكون TFileListBox يظهر مباشرة محتوى المجلد عند تحديده على TDirectoryListBox غير أن تحديد المجلد يتم بنقر مزدوج إذا أردت أن يتم تحديد المجلد بشكل فوري، اك…

وعليكم السلام ورحمة الله وبركاته المشكلة ليست في الحدث بذاته إنما ينبغي تعديل ذلك بعد فتح الاتصال بالجدول: procedure TForm1.FormCreate(Sender: TObject); begin Table1.Open; TMyDBGrid(DBGrid1).DefaultRowHeight := 30; end; بالتوفيق.

وعليكم السلام ورحمة الله وبركاته من أحسن ما يمكنك اختزال الزمن به سلاسلا Delphi Wiki http://delphi.wikia.com/wiki/Delphi_Videos رحلة ممتعة :) بالتوفيق.

إذا كان الحل بضبط Action على caFree فهذا لأن السطر: Application.CreateForm(TForm1, Form1); محذوف من ملف المشروع (dpr) على الأرجح. وهو كذلك أخي najy_zl بارك الله فيك على الإيضاح واعذرني لاكتب كلمات لأخي medreg أوضّح فيها موقفي (وإن كان المقام غير مناسب) أخي الع…

وعليكم السلام ورحمة الله وبركاته رسالة الخطأ: Types of actual and formal parameters must be identical تعني عدم تطابق معلمات الدالة المستدعاة مع التي في عبارة الاستدعاء وهو غالبا يحدث عند وجود التباس دالتين تحملان نفس الاسم مع اختلاف في أنماط المتغيرات عند استد…

وعليكم السلام ورحمة الله لم أفهم جيدا المطلوب، ويبدو أن table-return-value لإسترجاع جدول حالة استدعاء إجراءات الجداول TADODataSet هي أصل واجهة ADO وبه يمكن فعل كل شيء، وبقية المكونات تنحدر عنها. في ما يأتي مثال إجراء مخزن واستدعاؤه (في SQL Server) مثال T-SQL C…

وعليكم السلام ورحمة الله وبركاته أجل، يمكن توظيف ADO في Windows لوصل ق.ب. Oracle كما ذكر أخي الحلفاوي فقط في Data Source أكتب عنوان آي بي IP (أو local أيضا (لنفس الجهاز) إذا كانت ذاكرتي جيدة). بالتوفيق.

وعليكم السلام ورحمة الله وبركاته عادة تستخدم: Application.ProcessMessages; قبل تنفيذ أوامر مزامنة أو تستغرق وقتا عند التعامل مع جداول قاعدة بيانات يستحسن أحيانا استخدام DBApplication عوضا عن ذلك: DBApplication.ProcessMessages; أحسن من ذلك، Thread منفصل لذلك أو…

وعليكم السلام ورحمة الله وبركاته شاهد هذا المكون (مفتوح): http://www.onix.it/delphi/ وهذا (من موقع Torry): http://www.torry.net/vcl/dialogs/other/TKMAlert.zip وغير ذلك كثير... بالتوفيق.

وعليكم السلام ورحمة الله وبركاته بأي لغة تريدها؟ ماذا وجدت عند البحث؟ ماذا تقصد تحديدا بـ Data Structure؟

وعليكم السلام ورحمة الله وبركاته الأزرار في دلفي تغطي خاصية الرسم وبالتالي يتوجب عليك إعادة استدعاء أحد إجراءات الرسم مثال بإعادة استدعاء Canvas في TSpeedButton type TSpeedButton = class(Buttons.TSpeedButton)//1 procedure Paint; override;//2 end;//3 TForm1 = c…

وعليكم السلام ورحمة الله وبركاته اقترح عليك استخدام مترجم InnoSetup مع ISTool كمحرر http://www.jrsoftware.org/isinfo.php http://sourceforge.net/projects/istool/ مجاني+أسهل+دعم أكثر. بالتوفيق.

وعليكم السلام ورحمة الله وبركاته أولا: كما أشار الأخ، الاستعلام لم يكتب بشكل صحيح الاستعلام السابق يمثل دمج لجدولين، بحيث توزع كل قيمة من الجدول الأول على باقي القيم من الجدول الثاني وهو ما يعبر عنه بـ CROSS JOIN، ولا تكون له (عادة) أيه فائدة: SELECT * FROM No…