الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف نضع تاريخ اليوم على الفورمه

بدأه fire_stone64 في 19 يناير 2010 · 7 رد · 1,348 مشاهدة · في قواعد بيانات Visual FoxPro
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اخوتى كيف اضع تاريخ اليوم على الفورمه من اعلى

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

فى حقل تيكست بوكس وضغط انتر يقوم بالبحث وعرض النتيجة ؟؟؟

ارجوا الاهتمام للتواصل يا اخوتى

أاخوكم عماد من مصر
samacenterme@yahoo.com

#2

جرب التالي في اجراء Valid في TextBox

Select MyTable
if lastkey()=13 and .not. empty(this.value)
	set order to MyField
	seek this.value
	if found()
		messagebox("Found It")
	else
		messagebox("......")
	endif
endif

بالنسبة لعملية البحث فقد تتم بأكثر من طريقة

حيث تستطيع استخدام الامر Seek كما هو في المثال

أو الأمر Locate

أو الأمر IndexSeek

locate for alltrim(upper(this.value))$alltrim(upper(MYFiled))
if Found() 
...
else
...
endif

IF indexseek(alltrim(this.value),.t.,"MyTable") = .T.
.....
ELSE
.....
endif

أما بالنسبة لتحديد أي الأوامر تستخدم فهذا يتم بناءأً على هو مطلوب فعلا

ولا تنسى أهمية الفهرسة في هكذا موضوع

صحيح....بامكانك أيضا الاعتماد على أوامر Sql

Select * from Mytable where A=B into cursor MyCursor order By....

أستغفر الله العظيم و أتوب إليه

#3

شكرا لك اخى على اهتمامك

لقد وضعت الاوامر وتمت بصورة مقبولة لكن هناك مشكلة انى اردت العودة لادخال الاسم مرة اخرى فى نفس التيكست بوكس

واستخدمت setfocues لهذا الموضوع مع الاوامر التى ارساتها حضرتك ولكن البرنامج اعطى رسالة خطأ بان هذا الامر غير مسموح به مع valid

فكيف اعود مرة اخرى للحقل text1 برمجيا

واليك ما صنعت انا لكى ترى المشكلة

th

Select xray

if lastkey()=13 and .not. empty(this.value)

set order to name

SET EXACT OFF

seek ALLTRIM(this.value)

if found()

messagebox("Found It")

else

messagebox("......")

this.text1.Setfocus

endif

endif

كذلك اريد وضع تاريخ اليوم اعلى الفورمه فكيف ذلك

أاخوكم عماد من مصر
samacenterme@yahoo.com

#4

الاخ فاير ستون

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

إن شاء الله ينال اعجابك

date_form.rar

#5

شكرا لك اخى الكريم

عمل رائع نشكرك جميعا عليه

أاخوكم عماد من مصر
samacenterme@yahoo.com

#6

اخى العزيز

هذا برنامج متواضع إن شاء الله ينال اعجابك

رقم المشغل 1

كلمة المرور 1

توجد داتا بيس باسم BANKNAME يتم ادخال اسم الشركة

واخرى اسمها YEAR يوضع فيها السنة الحالية

عمل متواضع إن شاء الله يستفيد منه الجميع

ابوعبدالرحمن

MAIN.rar

#7

اهلا اخي أبو عبدالرحمن بيننا في منتداك

يعني ما شاء الله عن البرنامج، ان دل فانما يدل على تواضع صاحبه وليس تواضع البرنامج

سلمت يداك،

اطلعت أيضا على جزء من منظومة المبيعات التي طرحتها، وكلي ثقة بانها ستكون مرجعا مفيدا لمعظم الأعضاء،

وجميل ان تشارك بهكذا برنامج ( الذي يتضح من امكاناته أنه استهلك الكثير من وقتك وجهدك )

واقترح عليك ان أذنت لي أن تقوم بفتح موضوع مستقل لكل برنامج تقوم بتحميله ليكون مرجعا مستقلا يستفيد منه الأعضاء

مع التحية

أستغفر الله العظيم و أتوب إليه

#8

شكرا لك اخى SHADOWZ هذا من لطفك

مواضيع مشابهة