Ruta/Dirección/Path en PC Remoto

[jhonalone]

Gracias, Ecfisa.
¡Qué grande eres y que bien te explicas!

No te he respondido antes porque he estado probando.
Si no he comprendido mal, cuando quiera referirme desde NOTEBOOK, a una dirección de DESKTOP, deberé sustituir, (siguiendo tu ejemplo) C:\MiPrograma por \\DESKTOP\MiPrograma

y siguiendo esta lógica, C:\Ejemplo\Primero\MiPrograma SE DEBERÍA CAMBIAR por \\ DESKTOP\Ejemplo\Primero\MiPrograma

¿y los problemas de direcciones en red se solucionarían de este modo?

Gracias por tu esfuerzo y por tu ayuda.

Saludos.

[ecfisa]

Hola jhonalone.

¡Qué grande eres

Si quitás la lupa vas a ver que no es así...

Ahora fuera de bromas, lo que creo que al trabajar de ese modo, vas a tener que efectuar todas tus acciones desde la ubicación de la aplicación. Ya que es el único punto de referencia en común entre DESKTOP y NOTEBOOK.

Es decir que tu centro de operaciones debería ser:
Desde el equipo de escritorio (DESKTOP): C:\MiPrograma o ya sea, visto desde la laptop (NOTEBOOK): \\DESKTOP\MiPrograma


No estoy en red para probar el código siguiente, pero pienso que debería funcionar en ambos equipos.

Ubicándonos en DESKTOP, y suponiendo que tenemos: C:\MiPrograma\arch1.e1 y quisieramos guardar arch1.e1 en la carpeta C:\MiPrograma\Dir :

Código Delphi [-]
procedure CopiarArchivo(Origen, Destino: string; const Nombre: string);
begin
  Origen:= IncludeTrailingPathDelimiter(Origen)+Nombre;
  Destino:= IncludeTrailingPathDelimiter(Destino)+Nombre;
  if not CopyFile(PChar(Origen), PChar(Destino), True) then
    ShowMessage('Error al intentar copiar el archivo');
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  PtoPartida: string;
begin
  PtoPartida:= ExtractFilePath(Application.ExeName);
  CopiarArchivo(PtoPartida, PtoPartida+'Dir', 'arch1.e1'); // 'Dir' debe haber sido creado con anterioridad
end;
...

Pero como te dije arriba vas a tener que probarlo, no tengo manera de hacerlo ahora.

Un saludo.

[jhonalone]

Aun quitando la lupa, eres GRANDISIMO, Ecfisa.

Probaré lo que me mandas y te cuento.

Mientras tanto. Y si quieres entretenerte, te voy a proponer otra cuestión, que es para nota, (Bastante más complicada).
Si un usuario, elige como ruta de destino para los ficheros de copia de suguridad otro ordenador de la red, que no sea DESKTOP, sino otro portátil o sobremesa, conectado como NOTEBOOK2 o DESKTOP2, y esta dirección está grabada en un fichero, por ejemplo como "\\ DESKTOP2\Compartido", ¿Habría alguna posibilidad de averiguar, (desde DESKTOP), a qué dirección REAL corresponede y cómo puedo grabar las copias de seguridad en esta dirección, desde NOTEBOOK?.

Sé que es una pregunta muy complicada, (a lo mejor imposible de resolver), te pido que no gastes demasiado tiempo en resolverla si ves que es muy complicada.

Gracias por tu inestimable ayuda, Ecfisa.

Un saludo cordial.

[jhonalone]

Ecfisa, he probado tu código y funciona perfectamente. (NO esperaba otra cosa)

Gracias.
Un saludo.

[[newtron]]

Este ecfisa ya empieza a caerme mal, ¿es que sabes todo de todo?

[jhonalone]

Estaré fuera unos dias.
Pero no he olvidado el tema.
Lo digo por si tardo en responderos es por este motivo.
Saludos a todos.