عرض رقم السطر في التقرير

"يمكنك إنشاء حقل وهمي يتم تعبئته عن طريق وذلك فقط عند الطلب بحيث يتم عمل دالة لوب تمر على اول حقل وتبدأ بترقميه .:

المعذرة على الكلام الغير مرتب في الاجابة السابقة اعلاه لاني كنت على عجالة

على العموم اختي الكريمة

ارفق لك مثال على الاجابة

في هذا المثال انشات جدول للاصناف مكون من هذه الحقول

التسلسل " هذا هو الحقل الوهمي "

رقم الصنف

وصف الصنف

سعر الصنف

ملاحظات

ونريد ان نسرد هذه الاصناف في جدول وذلك على حسب الطلب من رقم صنف كذا الى رقم صنف كذا ، وعند عرض الجدول يجب ان يكون الجدول مرتبا برقم تسلسلي للاسطر فاننا نقوم بالتالي

procedure TForm1.Button1Click(Sender: TObject);
var
MyS : Shortint;
begin
MyS := 1;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM Items WHERE ItemNo between :P1 AND :P2');
ADOQuery1.Parameters.ParamByName('P1').Value := Edit1.Text;
ADOQuery1.Parameters.ParamByName('P2').Value := Edit2.Text;
ADOQuery1.Open;
ADOQuery1.First;

while not ADOQuery1.Eof do
 begin
   ADOQuery1.Edit;
   ADOQuery1.FieldByName('Serial').AsInteger := MyS;
   ADOQuery1.Post;
   ADOQuery1.Next;
   MyS := MyS+1;
 end;
ADOQuery1.Requery();
end;

ولعل المثال يغني عن الشرح

بامكانك تنزيل المثال من هذا الرابط

http://abohany101.topcities.com/InterNetFo...rm/rose2000.zip

بالرز الايمن اختاري حفظ الهدف

تقبلي تحياتي