کاهش I در حلقه while

[nilidelphi]

با سلام خدمت دوستان

یه سوال ذهنم رو درگیر کرده من یه حلقه while دارم که یکی یکی بالا میره
توی حلقه یه دستور if دارم که اگر شرط برقرار نشه میخوام که حلقه بجای اینکه جلو بره یکی کم بشه و حلقه دوباره تکرار بشه

نمیدونم تونستم منظورمو برسونم یا نه؟

[یوسف زالی]

while .. do
begin
.
.
if ... then
begin
dec(i);
continue;
end;
.
.
inc(i);
end; // of while