Não consigo usar o Repeat por que?

Se eu tirar o Repeat funciona normal mais se eu deixar, o registro e inserido e cancelado automaticamente... PQ?

IBQuery1.Open;
Repeat
IBQuery1.Insert;
IBQuery1.FieldByName(´NOME´).AsString:= edit16.text;
IBQuery1.FieldByName(´ENDERECO´).AsString:= edit17.text;
IBQuery1.FieldByName(´BAIRRO´).AsString:= edit18.text;
IBQuery1.FieldByName(´CIDADE´).AsString:= edit19.text;
IBQuery1.FieldByName(´ESTADO´).AsString:= edit20.text;
IBQuery1.FieldByName(´CEP´).AsString:= edit21.text;
IBQuery1.Post;
until Sair = ´S´;

[quote:62ff060579=´Moderação´][color=red:62ff060579]Tópico bloqueado por Massuda

[b:62ff060579]Tópico duplicado.[/b:62ff060579]
Por favor continue a discussão neste tópico[/color:62ff060579]
http://forum.clubedelphi.net/viewtopic.php?t=71109[/quote:62ff060579]