Main Menu y Botones

[feliz-58]

Tengo 2 Botones en un formulario. Digamos que cada uno abre un txt, El caption del 1 se llama Informacion y el caption del 2 se llama Ayuda, ejemplo:

Boton 1 (Informacion):

Código Delphi [-]
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ShellExecute (Handle, 'open', 'C:/prueba1.txt', nil, nil, SW_SHOWNORMAL);
end;

Boton 2(Ayuda):

Código Delphi [-]
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
ShellExecute (Handle, 'open', 'C:/prueba2.txt', nil, nil, SW_SHOWNORMAL);
end;

Agrege un MainMenu, en la primera opcion, Tengo Cambiar Ruta De informacion y En la seguna Tengo Cambiar ruta De Ayuda.

Lo que quiero hacer es que despues de haber complilado el ejecutable, por el MainMenu, poder cambiar la ruta de donde se encuentran los archivos, si antes se encontraban en ''C:/" Cambiarlo por ejemplo a ''D:/'' sin tener que volver a modificar el proyecto.


Seria un alivio Si me pudieran ayudar...

//Gracias