Reiniciar el Generador

[[BlueSteel]]

Hola.. justo estaba buscando algo por el estilo... funciona super bien desde el IBExpert... pero quisiera ejecutarla desde delphi... pero pasando el valor x, la idea es volverla al numero que yo quiera....

para tratar de cambiarle el valor estoy usando lo siguiente

IBQuery
IBTransaction

y el codigo es el siguiente

Código Delphi [-]
IBQ_Edit.SQL.Clear;
IBQ_Edit.SQL.Add('Set Generator "G_Orden_Numero" to Var1');
IBQ_Edit.Params[0].AsInteger := StrToInt(pOrden.Text);
IBQ_Edit.ExecSQL;
IBT_Edit.Commit;

alguien sabe como hacerlo...

Editado:::

lo hice así...

Código Delphi [-]
IBQ_Edit.SQL.Clear;
IBQ_Edit.SQL.Add('Set Generator g_orden_numero to '+QuotedStr(pOrden.Text));
IBQ_Edit.ExecSQL;
IBT_Edit.Commit;

pero tengo un error.. ya que no se como pasarle el dato de str a integer ???