Cambiar de directorio

[Cañones]

Bueno, vamos desde cero.
Tengo una aplicación X.
La estructura de las carpetas es la siguiente.
...\X -> Directorio principal
...\X\bin -> Directorio con el .exe los .ini y .dll
...\X\data -> Directorio con el .fbd y un archivo .txt para el log

Yo no se donde va a estar la carpeta X, ya que la idea es que sea portable y que se copie y pegue en cualquier lado y salga andando.
Puede estar en C:\X o en C:\Documents and Settings\cañones\Escritorio.
Entonces con la función extractpath puedo saber la ruta completa del .exe.
Como puedo cambiar de directorio laRuta\X\bin a laRuta\X\data.
Mi idea era usar alguna función de delphi, pero si no existe creo mi propio procedimiento.
Muchas gracias.
Saludos.