kachwahed

وعليكم السلام ورحمة الله وبركاته معظم مصصمات التقارير توفر إمكانية دمج ملف التقرير ضمن مصادر التطبيق، باعتبارها RCData في ملف DFM في مصمم التقارير Rave Reports تجد StoreRAV في المكون TRvProject في مصمم التقارير Fast Reports هناك StoreInDFM للمكون TfrxReport إض…

وعليكم السلام ورحمة الله وبركاته برأي أن أفضل طريقة لذلك باستخدام AppendRecord المعرف على مستوى TDataSet (وبالتالي أتوقع أن يكون في Absolute Database أيضا) يأخذ الإجراء مجموعة من الثوابت غير ذات النمط، يمكن استخدام نمط TVarRec لتخزين القيم مثلا مثال Matt Harri…

وعليكم السلام ورحمة الله وبركاته ما ذكر غير كاف لاكتشاف الخلل. التكهن صعب جدا... الأصل أن تعليمة Close المعرفة في TCustomForm تؤدي المطلوب، ما لم يطرأ عليها حدث أحيانا تتم... وأحيانا تفشل، هذا يعني أن هناك حدث يلغي مفعول الأمر Close... حاول اكتشافه جرب أيضا: ز…

السلام عليكم أعلم أن الموضوع قديم، فقط أردت أن أذكر بخصوص HDD Serial الأصل مثال IdeSN2 لـ Alex Konshin http://home.earthlink.net/~akonshin/delphi_components.htm هناك أمثلة أخرى جيدة في الموقع. أعدت ضبطها لتوافق إصدارات Delphi الأخيرة (حاليا): function GetIdeDi…

لا أرى في الأمر شيء إن كان الغرض الحصول على 30 يوم مجانية لاستغلال كامل لخصائص البرنامج Free, 30-day, fully-functional trial راسل الشركة وتحصل المفتاح التجريبي https://downloads.embarcadero.com/free/delphi يمكنك استخدام جهاز افتراضي لتمطيط المدة :happy:

كلا، هذا إجراء... وهذه الكتابة غير مقبولة لدى الـ Compiler جرب شيء مثل: if Assigned(TCheckBox(FindComponent(b2))) then

يكفي تثبيت SQL Server على جهاز واحد (Server) بقية الأجهزة تستخدم بروتوكول TCP/IP لاستغلال نفس قاعدة البيانات لتفعيل وضع الاتصال عبر TCP/IP قم بتشغيل خدمة (Service) يدعى SQL Server Browser مع ضبط Listen All على True.

السلام عليكم لقراءة لغة النظام: function GetWindowsLanguage: string; var WinLanguage: array [0..50] of char; begin VerLanguageName(GetSystemDefaultLangID, WinLanguage, 50); Result := StrPas(WinLanguage); end; طريقة أخرى: function GetLayout: string; begin SetLe…

وعليكم السلام ورحمة الله وبركاته مبدئيا: private لتعريف العناصر الخاصة بالوحدة public لتعريف العناصر العامة التي تخص كل وحدات المشروع

@Mohamed Moshrif Thanks for reply I guess that SQL Server provides a great advantages to protect data, and because most of developers don't mastering SQL Server properly they prefer to create they own user tables and do some tedious jobs! I should write Arabic…

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله نعلم أن SQL Server يوفر خدمات متقدمة لتسيير مستخدمي قاعدة البيانات وتحديد مستويات صلاحيات كل مستخدم... الخ لكن العديد من المبرمجين يلجأ بشكل "تقليدي" إلى إنشاء جدول لتخزين أسماء المستخدمين وشفرات (Hash) كلمات السر…

السلام عليكم اسمه: sa كلمة المرور: master بشيء مثل: USE [master] GO ALTER LOGIN [sa] WITH PASSWORD=N'YourPassword' GO بالتوفيق.

بارك الله لكم، شكرا كثيرا في الحقيقة لا يوجد شيء خاص، كل ما هنالك شركات موزعة في عدة مقطاعات تقوم بإعداد تقرير (سنوي، شهري) للنفقات، في شكل جدول حقل للتاريخ وباقي الحقول للنفقات الأخرى يتم نقل البيانات يدويا باستعمال قرص سريع (Flash Disk) إلى الشركة الأم حيث ي…

السلام عليكم ورحمة الله بعد البحث في المنتدى لم أجد موضوع مماثل. تسلمت مشروع إنجاز برنامج لإعداد تقارير نفقات ملحقات فرعية لإحدى الشركات طلب مني استخدام SQL Server حيث هناك الشركة الأم وعدة شركات فرعية تابعة لها لا يمكن الاعتماد على اتصال النت ولا Replication …

السلام عليكم ورحمة الله بارك الله للأخ مراد وجزاه خيرا عمل احترافي ورائع، وإن شاء الله في ميزان الحسنات. فقط تأكد من الرابط أخي الكريم: This shared file or folder has been removed. If you feel this is by mistake, please email either the owner of this shared fi…

السلام عليكم ورحمة الله أنا مبرمج #C مبتدئ استعمل Microsoft Visual Studio 2008، حاليا أعمل على مشروع في أحد الأجهزة التي تدعم نظام Windows Embedded CE قمت بتثبيت Windows CE Emulator ثم ثبتت عليه dotNET Framework Compact Edition، وتمكنت من تشغيل البرنامج المبرم…

يمكن أن يساعدك هذا: { This unit can be compiled into a package and will then appear in the delphi Help menu. } unit SDCSimpleExpert; interface uses ToolsApi; type TSDCSimpleExpert = class(TNotifierObject, IOTAMenuWizard, IOTAWizard) public function GetIDString…

وعليكم السلام ورحمة الله وبركاته أخي الكريم، إقرأ جيدا هذا الكود //1. CreateMutex unit Unit1; uses Windows, Dialogs, Sysutils; {....} implementation {....} var mHandle: THandle; // Mutexhandle initialization mHandle := CreateMutex(nil, True, 'XYZ'); if GetLast…

وعليكــم السـلام ورحمة الله وبركاتـه.. في المرفقات مجموعة من الأكواد التي يمكن أن تساعدك أخي محمد، من حقك أن تسأل ذلك، لكنه لا يمكنك التأكد من نية السائل مهما حاولت، إذن نرجع إلى الأصل وهو حسن الظن بالآخرين والله من وراء القصد. بالتوفيق أخي الكريم Codes.rar

شكر أخي على الرد. كلاهما، قصدت بالسجلات المحتوى. SQL Server 2008 أظن أن مكونات HeidiSQL توفر هذه الخدمة لكن على MySQL فقط. شكرا كثيرا.