FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Guardar Archivo
Hola Delphimaniaticos...
tengo una consultita.... Como puedo guardar un archivo en un Directorio X con un Nombre Y, pero sin utilizar el Cuadro de Diagolo que viene con el Dephi 7. como dato, conozco el Directorio, El nombre del Archivo, y la Extención.... y si no se puede, existe alguna manera de utilisar el SaveDialog en modo invisible o algo parecido.... la idea es que cuando el usuario presione guardar, este se guarde en el directorio por defecto y con el nombre por defecto....
__________________
BlueSteel |
#2
|
||||
|
||||
No entiendo bien la duda, pero: ¿No quieres que el usuario seleccione el directorio?... entonces obvias el TSaveDialog y asignas desde el código el directorio que mas te guste!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
#3
|
||||
|
||||
De hecho, el SaveDialog en realidad no guarda ningún archivo... simplemente permite al usaurio seleccionar la ubicación y el nombre que quiere darle... y espera que el programador use esta información para enviarlo al disco.
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
#4
|
||||
|
||||
shuata.. y como seria la sentencia ?
sera algo asi SaveAs(Unidad,Directorio,Nombre_Archivo) ?
__________________
BlueSteel |
#5
|
||||
|
||||
Que es lo que quieres guardar????... dónde lo tienes almacenado???
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
#6
|
|||
|
|||
Depende de que tipo de archivo quieres guardar y desde donde?
Si es un archivo de texto y lo quieres guardar desde un TStringList, sería algo como:
Si es un bitmap o cualquier formato gráfico desde un TImage o TPicture podría ser algo como:
Saludos... |
#7
|
||||
|
||||
Estas utilizando un TActionManager con un TFileAction????
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
#8
|
||||
|
||||
Quiero guardarlo en formato PDF .... lo cual hasta el momento me funciona muy bien.... (Estoy traspasando un Informe de QReport a PDF.... y todo bien...)
El código que utilizo es el siguiente Código:
procedure TOrdenes.Generar_PDF; Var aPDFFilt : TQRPDFDocumentFilter; Nom : String; begin Filtra_Orden; Guarda_Pdf.Title := 'Orden de Compra - Club Deportivo Huachipato'; Guarda_Pdf.FileName := Concat(IntToStr(IBQ_Select['Ord_Numero']),'.pdf'); If Guarda_Pdf.Execute Then Begin ChDir(ExtractFilePath(Guarda_Pdf.Filename)); Nom := Guarda_Pdf.FileName; aPDFFilt := TQRPDFDocumentFilter.Create(Nom); With TOrdenes.Create(Application) Do Try Imprime_Orden.QuickRep1.ExportToFilter( aPDFFilt); Except ShowMessage('Error al crear el archivo'); Raise; End; aPDFFilt.Free; End end; Además, otra consulta, como puedo hacer para verificar si el Archivo ya Existe ?... para que no lo sobreescriba.... y se evite un paso....
__________________
BlueSteel |
#9
|
|||
|
|||
Prueba con estas modificaciones:
Si te fijas, le agregué 2 try...finally al código, esto es para liberar los objetos creados dentro del método... Saludos... |
#10
|
||||
|
||||
Yo creo que a ti te hace falta un poco de descanso Tómate un respiro y reexamina el código y la pregunta que haces.
A ver, en ¿qué parte del código usas lo que devuelve el SaveDialog? En estas dos líneas: ChDir(ExtractFilePath(Guarda_Pdf.Filename)); Nom := Guarda_Pdf.FileName; La primera es para cambiarte de directorio y la segunda para crear TQRPDFDocumentFilter quien recibe el nombre del archivo. Pero estas dos cosas tú ya las tienes sin necesidad del SaveDialog. Entonces úsalas directamente. // Saludos |
#11
|
||||
|
||||
Yo creo que el problema es que has copiado el código de otro lado y estas tratando de modificarlo sin entender lo que hace primero.
Lo primero no es un pecado, si el autor lo ha publicado para eso, pero lo segundo (para mi) si lo es. Hasta luego.
__________________
Juan Antonio Castillo Hernández (jachguate) Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate |
|
|
|