نمایش محتوی اخرین رکورد

[eilia_43]

سلام.خسته نباشید.
من در form7 از بانکی که در form6 بود استفاده کردم وبرای اینکه از محتوی آخرین رکورد خود مطلع باشم دستور زیر را در form7 تایپ کردم.

form6.adotable1.Last;
;(label17.Caption := inttostr(form6.adotable1.fieldbyname('n_sabt').AsI nteger

در form6 نیز یک دکمه به نام EDIT دارم که با زدن این دکمه form7 باز می شود.اما مشکل من اینجاست که همیشه آخرین رکورد برای ویرایش باز می شود به خاطر دو دستوری که درform7 تایپ کردم.

چی کار کنم که هم در form7 محتوی آخرین رکورد رو داشته باشم وهم با زدن edit رکورد انتخابی مورد ویرایش قرار بگیرد نه همیشه آخرین رکورد .
پیشاپیش از کمکتون متشکرم.
_________________________________
اللهم عجل لولیک الفرج

[m-khorsandi]

پس شما میخواهید که بعد از بدست آوردن مقدار یکی از فیلدهای آخرین رکوردتون،
رکوردی جاری رو ویرایش کنید؟ اگه جواب مثبت هست میتونید از روش زیر استفاده کنید:

یه متغیر از نوع TBookMark (اشاره گر) تعریف کن.



var
BM: TBookMark;


متغیر مربوطه رو با استفاده از متد GetBookMark مقدار دهی کن :


BM := ADOTable1.GetBookmark;


آخرین رکورد جدول رو فعال کنید :


ADOTable1.Last;


دستور مورد نظر رو بنویسید


;(label17.Caption := inttostr(form6.adotable1.fieldbyname('n_sabt').AsI nteger


و بعد هم با دستور زیر رکورد قبل از Last فعال کنید


ADOTable1.GotoBookmark(bm);


توضیح
GetBookMark تخصیص یه نشانگر/علامت به محل جاری اشاره گر DataSet
ْ