rober

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

السلام عليكم أخي الكريم الرابط دلفي و mysql يحتوي مشروع عملي بسيط جدا فيه معظم العمليتات التي ذكرتها ما عدا * إضافة أصوات إلى هذا البرنامج وخاصة عند النقر على الأزرار * كيفية عمل التنصيب لهذا البرنامج وخاصة عند نقله إلى حاسوب أخر إن كان ما تطلبه هو شرح فسأحاول…

السلام عليكم أخي الكريم زكيري عبد العالي في الموضوع هنا أخبرتنا( انا الان غريق في C# ) فأطلعنا برأيك عن هذه المقالة بما أنك قد دخلت عالم C# فهل هذه المقالة صحيحة أم لا أنا مع أن المبرمج يجب أن يتقن أكثر من لغة برمجة لكن برأيي يجب أن تكون اللغات متقاربة إلى حد …

السلام عليكم شكرا أخي للتوضيح أنا أستخدمت أحد الطرق التي أشار إليها الأخ GamingMasteR و هي وضع مفتاح في الريجستري كما يمكن جعل البرنامج يعمل 10 أيام فقط procedure TForm1.FormCreate(Sender: TObject); var reg : tregistry ; tim : integer ; begin reg := tregistry.…

أخي الكريم إن كنت تقصد كواجهة يجب أن تبحث عن setup للغة الصينة أما إن كنت تبحث عن لغة كتابة فأنظر الصورة المرفقة ملاحظة : ممكن تحتاج سيدي ويندوز

أخي الكريم GamingMasteR لاحظ كلمة ( ينفذ ) يمكن وجهة نظري خاطئة لكن هذا ما فهمته من كلمة ( ينفذ ) بالنسبة للكسر مافي غيرك لها :cash:

ممكن for procedure TForm1.Button1Click(Sender: TObject); var i:integer ; begin for i:= 1 to 10 do showmessage('this is try num ' + inttostr(i)) ; end; كما أن while تقوم بنفس المهمة procedure TForm1.Button1Click(Sender: TObject); var i:integer ; begin i:= 1 ; w…

أخي الكريم لاحظ أن الأمر سينفذ 200 مرة و لن يتم تأخيره فهو سينفذ مع أول قيمة لـ I أنا مع الطريقة التي قدمها الأخ asrocks طريقة ثانية هي أستخدام الأمر (sleep) (sleep(100

السلام عليكم أخي الكريم تريد تأخير التنفيذ( لمدة معينة) =وقت أم = أمر معين ؟؟؟

السلام عليكم كما يعلم الجميع فإن databasename في الأنتربيز في حال كانت على الشبكة يكون على الشكل ( server: c:\database\test.gdb ) أنا أقوم يتحديد إسم السيرفر برمجيا باستخدام تابع خاص ( قمت بعمل مثال موجود في المرفق للتعرف على التابع ) سرقة :evil: المشكلة هي كي…

في أحد المرات كنت أعمل فلترة على جدول بعد إدخال جديد عند عمل الفلترة لا تظهر نتيجة حتى قمت بإضافة table.first ملاحظة ( ليس دائما و لا أعرف السبب) و أنا أضعها دائما للأحتياط

السلام عليكم أخي الكريم بانسبة للحفظ برأيي أن تكون الأرقام int أو real لتلافي حدوث خطأ أثناء أجراء العمليات عليها بالنسبة للبحث أنا أستخدم filter table.filtered := false ; table.filter := 'ColName like '''+edit1.text+'''' ; table.first ; table.filtered := true…

السلام عليكم أخي الكريم بالنسبة للتعديل بالجداول (FieldValues) تستخدم لأخذ و وضع القيم في الجدول = تعديل أما بالنسبة للبحث أنا أستخدم (filter) من أجل البحث على الشكل التالي table.Filtered:=false; table.Filter :='ColName like "'+Edit1.Text+'"'; table.First; tab…

السلام عليكم أخي الكريم كما تفضل الأخ Swift سيتم إغلاق الموضوع بسبب طرحه من قبل راجع الرابط التالي و ستجد فيه طلبك فقط قد الأخ Swift فيه مجموعة من الأيقونات /index.php?showtopic=164192

السلام عليكم أرجو أن يكون هذا الكود هو ما تبحث عنه بكل الأحوال هذه طريقة من الطرق التي قد يفيدك بها ذوي الخبرة procedure TForm1.Button1Click(Sender: TObject); var a,b : integer ; c : real ; begin // إجراء إحتياطي في حال كانت إحدى القيم في الجدول فارغة // تلافي…

السلام عليكم أخي الكريم أرجو أن يكون الملف المرفق هو ما تبحث عنه drag_and_drop.zip

السلام عليكم أخي الكريم يعطيك ألف عافية على هذه الساعة لكن ينقصها الشكل الجيد

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

السلام عليكم أخواني الكرام عندي بطاقة Ralink و قد فقدت اللاقط الخاص بالبطاقة ولم أجد شخص لديه اللقط فقط :tantrum: فهل البطاقة تلتقط أشارة الـ Wirless بدون اللاقط :unsure: أرجو المساعدة

السلام عليكم أختي الكريمة الرابط هو مشروع أداري و شبه محاسبي لشركة مفروشات ( أثاث ) و هو غير كامل فهو واجهات فقط يمكنك رؤية الواجهات و أخذ فكرة عامة منه /index.php?showtopic=158312