Cita:
Empezado por aldemar.bohorqu
En mi caso lo hice así: "C:\\Documents and Settings\\nubia\\Escritorio\\prueba2\\datos\\AGENDA.TXT". Pero me imagino que cuando el programa lo corra en otra computadora no va a servir el enlace.
Gracias.
|
Hola aldemar.bohorqu.
Si, así es no va a servir. Pero como imaginas bién, la solución viene de la mano de la función
ExtractFilePath.
Ejemplo:
Código:
{
AnsiString FullFileName;
FullFileName = ExtractFilePath(Application->ExeName) + "AGENDA.TXT";
Memo1->Lines->LoadFromFile(FullFileName);
...
}
De ese modo siempre obtenes la ruta a tu ejecutable esté en la computadora y carpeta que esté.
Escribí el código de ese modo para dar más claridad, pero en la práctica el ejemplo se puede reducir a:
Código:
{
Memo1->Lines->LoadFromFile(ExtractFilePath(Application->ExeName)+"AGENDA.TXT");
}
Saludos.
