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 |
|
|
|