كيف اسند القيمة Null لحقل في ق ب نوعه عددي

سلام عليك

هكذا

    tableNrEtudiant.value:='';

على الأقل أنا أفعل هذا مع firebird

السلام عليكم ورحمة الله تعالى وبركاته

يمكنك ايضا

if table.fieldvalues['xxxxx']<>0 then table.fieldvalues['NrEtudiant']:=xxxx 
else table.fieldvalues['NrEtudiant']:='';

من لا يشكر الناس لا يشكر الله
كل الشكر للأخوين الكريمين أحمد و Medreg
عندما تدرج تسجيلة جديدة في ق البيانات ولا تمنح بعض
بعض الحقول قيم يحوي هذا الحقل القيمة null أي لا شي
أعرف الطريقة التي تعرف بها هل هذا الحقل يحوي قيمة نيل
أولا لكن بعد ادراج قيمة عدداية لهذا الحقل لا أستطيع
اعادة القيمة نيل له
واضح ان الاخوين لم يلاحظوا بأني قلت أن هذا الحقل نوع
قيمتة عددية وليست حزمة حرفية اجابتكم تعطيني خطأ في
المتغيرات شكرا جزيلا مرة أخرى
والله الموفق والمستعان

في هذه الحال استعمل استعلام sql مثل

update tabme_name set clm1='balbalbal',
clm2=null
where id=numero

clm2 هو الحقل العددي الذي أن ترجع قيمته إلى null

من لا يشكر الناس لا يشكر الله

السلام عليكم ورحمة الله وبركاته

شكرا لك أخي أحمد

لم يسبق لي التعامل مع sql  في عملية التغير والحذف

فقط اقتصر تعاملي معها على الاستعلامات

أنا استخدم المكون query  وليس AdoQuery 

استعملت طريقتك هي تعمل وتحقق نتيجة بمنح الحقل قيمة Null  لكن تعطيني خطأ

اليك الكود الذي استخدمته

Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('update Fils.db  set NrHywaya = Null');
Query1.SQL.Add('where NrFils = :D1');
Query1.Params.ParamByName('D1').Value:='01';
Query1.Active:=true;

والخطأ الذي يظهر

erreur la création du handele de curseur

هل هناك خطأ في الكود أو تقصير في وضع الخصائص في مفتش الكائنات

بالنسبة لــ Query

وشكرا مجددا

والله الموفق والمستعان

هل اسم القاعدة هو fils واسم الجدول هو db ؟

إذا كان كذلك فلا يظهر خطأ في الكود ، ربما يكون في شيء آخر ، قم بعملية الفحص سطرا سطرا

من لا يشكر الناس لا يشكر الله

السلام عليكم ورحمة الله وبركاته

شكرا لك أخي أحمد

Fils هو اسم الجدول و db  هو امتداد الجدول يرمز لــ ق ب برادوكس

هل تقصد انت باسم ق ب هو alias  أي الاسم المستعار

فأكيد أن الكود يحوي خطأ فأنا وضعت فقط Fils.db  وهو اسم الجدول

اسم alias عندي هو Moyennes

والله الموفق والمستعان

سلام عليك

لم أتعامل مع برادوكس من قبل لذلك لا يمكنني  أن أعرف أصحيح ما كتبت أم خطأ

يجب عليك أن تبحث في وثائق برادوكس كيف يتم الاستعلام

تحياتي

من لا يشكر الناس لا يشكر الله

شكرا لك أخي العزيز أحمد على مجهودتك

اله يبارك فيك ويجازيك كل خير

والله الموفق والمستعان

السلام عليكم ورحمة الله تعالى وبركاته

ارجوا ارفاق مثال بسيط يحتوي على المشكل

حتى نتمكن من فهم الخطأ والمحاولة للتصحيح

من لا يشكر الناس لا يشكر الله 

السلام عليكم ورحمة الله وبركاته

شكرا لك أخي medreg

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

شكر لك ثانية وجزاك الله كل خير

والله الموفق والمستعان

Etudiant.rar

تغيير بسيط على الكود

انظر

مراد23 كتب:

من لا يشكر الناس لا يشكر الله 

 

السلام عليكم ورحمة الله وبركاته

 

شكرا لك أخي medreg

 

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

شكر لك ثانية وجزاك الله كل خير

والله الموفق والمستعان

procedure TForm1.Button4Click(Sender: TObject);
begin
Table1.Open;
Table1.First;
if Not Table1.FindKey([EditNrEtudiant.Text])then
begin
ShowMessage('ÑÞã ÇáÊáãíÐ ÇáãÏÑÌ ÛíÑ ãæÌæÏ');
end else
    begin
Table1.Edit;
// åÐå ÇáÊÚáíãÉ åí ÇáÊí ÊÚØíäí ÎØÃ
Table1Moyenne.Clear;
Table1.Post;
Table1.Refresh;
Query1.close;
Query1.Open;
Query1.Refresh;
end;

end;

بدلا من ان تكتب

table1Moyenne.value:=Null

اكتب

Table1Moyenne.clear;

وبالتوفيق

من لا يشكر الناس لا يشكر الله 

السلام عليكم ورحمة الله وبركاته

شكرا لك أخي medreg

بارك الله فيك وجزاك وكل القائمين على المنتدي خير الجزاء

أكرر شكري

حقا لا يشقى من يأخذ العلم عن معلم

 والله الموفق والمستعان.

لا شكر على واجب