27-02-2012, 08:38 AM
السلام عليكم ورحمة الله وبركاته
التالى احد اكواد تسجيل فى برنامج تسيير عياده طبيه مفتاحه id
وهى مربوطه على سيرفر محلى بواسطه قاعدة بيانات mysql
العمل بدلفى 7
ماهو :
1- سطر اضافتة سطر جديد لن قيمة(اضافة سطر جديد لاتعمل)
2- يوجد الاداة تايمر واحتاج منه لتخزين 3 انواع من التواريخ
تاريخ التسجيل الحاله- تاريخ خروج الحاله-وتاريخ تعديل جدول من دكتور
3- قيمة الانهاء بدل hide; لن اغلاق لن تعمل
ملاحظات: لدى بحث فى منتدى فقرتين 1 و 3 موجوده فكره فى مشر وع تسيير مخزن ولكنها لاتعمل وفقرة 2 لم اجد طريقه ماموجود 3 مواضيع فقط
التالى احد اكواد تسجيل فى برنامج تسيير عياده طبيه مفتاحه id
وهى مربوطه على سيرفر محلى بواسطه قاعدة بيانات mysql
العمل بدلفى 7
كود :
begin
MyTable1.Append;
MyTable1.Open;
MyTable1.Edit;
MyTable1.FieldValues['id']:=+1;
MyTable1.FieldValues['name']:=Edit1.text;
MyTable1.FieldValues['age']:=Edit2.text;
MyTable1.FieldValues['job']:=Edit4.text;
MyTable1.FieldValues['adress']:=Memo1.text;
MyTable1.FieldValues['number']:=Edit6.text;
MyTable1.FieldValues['time']:=Edit9.text;
MyTable1.FieldValues['sex']:=ComboBox1.text;
MyTable1.FieldValues['Marital Status']:=ComboBox2.text;
MyTable1.FieldValues['Sexual']:=ComboBox3.text;
MyTable1.FieldValues['Religion']:=ComboBox4.text;
MyTable1.Post;
MyTable1.Close;
FORM3.SHOW;
Hide;
end;1- سطر اضافتة سطر جديد لن قيمة(اضافة سطر جديد لاتعمل)
2- يوجد الاداة تايمر واحتاج منه لتخزين 3 انواع من التواريخ
تاريخ التسجيل الحاله- تاريخ خروج الحاله-وتاريخ تعديل جدول من دكتور
3- قيمة الانهاء بدل hide; لن اغلاق لن تعمل
ملاحظات: لدى بحث فى منتدى فقرتين 1 و 3 موجوده فكره فى مشر وع تسيير مخزن ولكنها لاتعمل وفقرة 2 لم اجد طريقه ماموجود 3 مواضيع فقط