+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يمكن عمل شرط لخلايا فارغة في اكسس access (/showthread.php?tid=5414)
كيف يمكن عمل شرط لخلايا فارغة في اكسس access - hmidadz - 22-07-2013
السلام
يوجد في اكسس خلايا فارغة كيف يمكن عمل شرط عليها
علما انها تسبب مشكل عند استعمال ADOStoredProc1.FieldValues
مثال
if (ADOStoredProc1.FieldValues=null)
نفد شيئ اخر
كيف يمكنني تحقيق هدا
كيف يمكن عمل شرط لخلايا فارغة في اكسس access - بن دهيبة - 22-07-2013
وعليكم السلام ورحمة الله تعالى وبركاته
كود :
if ADOStoredProc1.Fields[1].IsNull thenكيف يمكن عمل شرط لخلايا فارغة في اكسس access - hmidadz - 23-07-2013
تعمل جيدا شكرا لكن مدا تقصد بالواحد
كيف يمكن عمل شرط لخلايا فارغة في اكسس access - بن دهيبة - 23-07-2013
واحد هو ترتيب الحقل حيث أن الحقل الأول ترتيبه صفر
مثال:
كود :
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
Info:string;
begin
for i := 0 to ADOStoredProc1.FieldCount - 1 do
Info := Info + ADOStoredProc1.Fields[i].FieldName + #10;
ShowMessage(Info);
end;