Foros Club Delphi - Crear carpeta con la fecha actual ???

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Crear carpeta con la fecha actual ??? (https://www.clubdelphi.com/foros/showthread.php?t=64175)

dellarts

20-03-2009 17:50:42

Crear carpeta con la fecha actual ???

Hola

Estoy intentando crear una carpeta con la siguiente instruccion pero no lo consigo. Lo he conseguido poniendo un nombre cualkiera x cuando añado la hora no me lo hace y no sale ningun error siquiera.

Código:

var

  data:tdatetime;

  a:string;

begin

  a := 'aa1';

  data := now();

  createDir('C:\ciclistes\image#'+datetimetostr(data)+'#'+'');

end;

Saludos

dec	20-03-2009 17:54:42

Hola,

Lo que ocurre es que la cadena que retorna "datetimetostr()" incluye caracteres ("/") que no se permiten para los nombres de archivos o carpetas. Tendrás que sustituirlos, o formatear la fecha de manera que no incluya esos caracteres.

ContraVeneno

20-03-2009 18:01:31

Código Delphi [-]CreateDir('C:\UnaCarpeta\'+FormatDateTime('yyyymmdd', Now));

dellarts

20-03-2009 18:04:52

Gracias voy ha intentarlo

dellarts

20-03-2009 18:41:39

Ya lo consegui muchas gracias

Cañones

13-08-2010 00:51:04

Cita:

Empezado por ContraVeneno (Mensaje 342137)

Código Delphi [-]CreateDir('C:\UnaCarpeta\'+FormatDateTime('yyyymmdd', Now));

Hola ContraVeneno, tengo un problema con tu código.
Si dentro de C:\no existe "UnaCarpeta" no funciona.
Desde ya muchas gracias

ecfisa

13-08-2010 05:56:37

Hola

Sacá el '\' despues de 'C:\UnaCarpeta':

Código Delphi [-]  CreateDir('C:\UnaCarpeta'+FormatDateTime('yyyymmdd', Now));

Si no la cadena que enviás es: 'C:\UnaCarpeta\20100813' ( si hablamos de hoy... :) ),
y como 'C:\UnaCarpeta', aún no fue creada, lógicamente no puede crear la carpeta '20100813' que depende de la anterior.

Saludos.

ContraVeneno

13-08-2010 18:42:02

Obvio, mi querido Watson :D:D

lo de "unaCarpeta" era solo por ejemplo... así com utilizo "UnQuery", "UnGrid", "UnaTabla", etc., etc... era solo para el ejemplo.

Saludos. :)

rgstuamigo

13-08-2010 22:04:38

Cita:

Empezado por Cañones (Mensaje 373426)

..., tengo un problema con tu código.
Si dentro de C:\no existe "UnaCarpeta" no funciona.
...

En ese caso para obligar la creacion de los directorios(Carpeta) padres, puedes utilizar la funcion "ForceDirectories" en lugar de "CreateDir". ;)
Saludos...:)

ecfisa

13-08-2010 22:20:34

Cita:

Empezado por rgstuamigo (Mensaje 373508)

En ese caso para obligar la creacion de los directorios(Carpeta) padres, puedes utilizar la funcion "ForceDirectories" en lugar de "CreateDir". ;)
Saludos...:)

Ya estoy cambiando el refran:
"todos los días se aprende algo nuevo"

por:
"todos los días se aprende una función nueva" ... :)

Saludos.

Cañones

14-08-2010 13:33:34

Cita:

Empezado por rgstuamigo (Mensaje 373508)

En ese caso para obligar la creacion de los directorios(Carpeta) padres, puedes utilizar la funcion "ForceDirectories" en lugar de "CreateDir". ;)
Saludos...:)

Muchas gracias. Justo lo que necesitaba. Gracias nuevamente por entender lo que necesitaba.

Saludos de Cañones.

manujimenez

23-04-2013 19:36:16

Renombrar una carpeta

Y como se renombra una carpeta que ya tienen ficheros y directorios con la fecha????
por que esto no me funciona?

CreateDir('C:\www'+ 'FormatDateTime'('yyyymmdd', Now));

:|

Casimiro Notevi

23-04-2013 19:40:24

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración :)

Recuerda poner los tags al código fuente, ejemplo:

Gracias :)

ecfisa

23-04-2013 19:44:59

Cita:

Empezado por manujimenez (Mensaje 459132)

Y como se renombra una carpeta que ya tienen ficheros y directorios con la fecha????
por que esto no me funciona?

CreateDir('C:\www'+ 'FormatDateTime'('yyyymmdd', Now));

:|

Hola manujimenes.

Por favor, no dupliques las consultas. Ya realizaste esa pregunta en este hilo.

Saludos.

La franja horaria es GMT +2. Ahora son las 07:20:11.