كيف امسح محتويات جدول

اخى الكريم

عليك بكتاب اسرع طريق لتعلم البرمجة - الباب الثانى - حيث يعطى لك اساسيات التعامل مع ملفات البيانات

http://www.kutub.info/library/open.php?cat=1&book=402

حتى تحصل على المعلومة بشكل مبسط

وبخصوص الرسالة التى تظهر استخدم الدالة messagebox

وهناك اسلوبين لحذف السجلات

1 - الاول تعليم السجلات لغرض الحذف باستخدام الامر Delete

وحينها تكون السجلات موجودة ولكن يتم استبعادها وكانها غير موجودة

وذلك عن طريق استخدام الامر set delete on الذى يضمن ظهور الملف بدون السجلات

المعلمة لغرض الحذف

وميزة هذه الطريقة انه يمكن ان نسترجع السجل فى اى وقت عن طريق استخدام الامر recall

وايضا هى الطريقة الاساسية فى حالة عمل برنامج يعمل على الشبكة

وتكون ملفات البيانات مفتوحة بغرض المشاركة حيث يتم استخدام الامر set exclusive off

قبل فتح الجداول بالامر use

لتعليم كل السجلات لغرض الحذف استخدم الامر Delete All

local mymsg
set delete on
mymsg = MESSAGEBOX("Are you sure ?",4,"Delete")
IF mymsg = 6
	 delete all
	 thisform.refresh
Endif

ويفضل ان يكون الامر set delete on فى بداية البرنامج او فى بداية النموذج الحدث load event

2 - الاسلوب الثانى

استخدام الامر zap وهو يشترط ان تكون الملفات مفتوحة بشكل خاص set exclusive on

مثال

local mymsg
mymsg = MESSAGEBOX("Are you sure ?",4,"Delete")
IF mymsg = 6
	zap
	thisform.refresh
Endif

مع تحياتى للجميع

والله الموفق

شكرا لك يا اخي العزيز و اسف على الاطالة و الازعاج

العفو اخى الكريم ولايوجد ازعاج مطلقا انت منورنا فى المنتدى

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

مع تحياتى للجميع

والله الموفق

اخي العزيز لم تجبني على كيفية تغيير لون ال Command هل يوجد طريق برمجي اذ لم اجد خاصية تغيير اللون في الخصائص .

طبعا يوجد خاصيتين لذلك

واحدة للون الكتابة تسمى forecolor

والاخرى للون الخلفية تسمى backcolor

وانتبه جيدا لان دعم تغيير الالوان فى زر الامر command button لم يكن موجودا فى visual foxpro 6

لهذا تاكد انك تعمل على الاصدار visual foxpro 9

ومن الامور المضحكة فى فيجوال ستديو 6 القديم.

انا فيجوال فوكس برو 6 كانت تسمح بتغير لون الكتابة فى زر الامر ولاتسمح بتغير لون الخلفية

بينما فيجوال بيسك 6 كانت تسمع بتغير لون الخلفية ولا تسمح بتغير لون الكتابة

مع تحياتى للجميع

والله الموفق