import چند رکورد انتخاب شده از DBGrid در اسکیوال

[Delphi,SQL]

سلام
من یه DBGrid دارم که دیتا رو از اکسس میگیره میریزه تو اسکیوال.
اما حالا میخوام کاربر چندتا رکورد موردنظرشو انتخاب کنه و با راست کلیک بریزه تو اسکیوال
من توی آیتم PopupMenu برای onClick چه شرطی بذارم که فقط همون رکوردا رو بریزه؟
ببینید وقتی میخوام همه رکوردا رو بریزم از حلقه

While not (ADOQuery1.Eof) do

درست کار میکنه برای راست کلیک هم قبل از این حلقه اینو میذارم

While (DBGrid1.SelectedRows.CurrentRowSelected) do
Begin
while not(ADOQuery1.Eof) do

اما هیچکاری نمیکنه!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !

[مرد مباح]

1. نیازی به حلقه نیست و فقط کافیه اون کدی که توی صاهمث گذاشتی رو اینجا یزاری اینجوری اون رکورد که روش بودی ک÷ی میشه.
2. اگه میخوای چند تا باشه یک فیلد از جنس Boolean اضافه کن و بعد فیلتر کن