Delphi - Problemas con SELECT FIRST

Saludos.

Alguien me puede decir en que esta mal el siguiente codigo ?

function TfrmTablaEnvios.TotalEnvios : integer;
var
Aux : integer;
begin
Total := 0; /// Total y TotalPaginas son Globales.....
TotalPaginas := 1;
With MD.ibquery1 do
begin
Close;
sql.clear;
sql.add('SELECT COUNT(ID) FROM ENVIOS');
Open;
if (Not IsEmpty) then
Total := fieldbyname('COUNT').AsInteger;
Close;
end;
if(Total>0) then
begin
if(Total<RegPorPagina) then
RegPorPagina := Total;

TotalPaginas := (Total div RegPorPagina);
Aux := Total Mod RegPorPagina;
if(Aux>0) then
TotalPaginas := TotalPaginas + 1;
if(TotalPaginas<=0)then
TotalPaginas := 1;
end;
Result := Total;
end;//END PROC.

Procedure TfrmTablaEnvios.btnPagina1Click(Sender : TObject);
var
Query : String;
begin
CurPagina := 1; //<---var global.
Query := 'SELECT FIRST %d SKIP 0 * FROM ENVIOS ORDER BY ID';
Query := Format(Query, [RegPorPagina]);
EjecutaComando(Query);
end;

procedure TfrmTablaEnvios.EjecutaComando(Comando : String);
begin
if (Comando<>'') then
begin
MD.IBQuery2.Close;
MD.ibquery2.sql.Clear;
MD.ibquery2.SQL.Add(Comando);
MD.ibquery2.Open;
end;
end;

El problema es que al ejecutar la función EjecutaComando el programa me marca

SQL Error code -104
Token Unknown 3.

Donde el 3 correponde al valor de RegPorPagina.

alguna idea ?

Gracias de antemano.