¿Compactar una bd tipo Firebird?

[[duilioisola]]

Empezado por FGarcia

Entiendo que la asignacion del resultado de la funcion es arbitraria pues si hay un error no se donde leerlo, asi que si alguien puede aportar algo mas se agradece.

En la variable "s", vas guardando el resultado del backup. Por lo tanto, CREO, que es lo mismo que devuelve:

gbak -t NombreBase.FDB NombreBase.FBK

Si el resultado es vacío, todo ha ido bien. Si hay algo, ha habido un error.

Si no es así, pon nuevamente el Memo y mira qué pone. Supongo que habrá un mensaje cuando termina.
Puedes guardarte eso y lo comparas con el resultado de tus Backups. Si es distinto Result := False!