FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
problema con funciones delphi
sigo teniendo problemas con las funciones copyfile y movefile, ya revise lo que devuelve la funcion getlasterror, pero el llamado al api esta OK, este es el codigo que tengo:
var ExistFile,NewFile: String; if opendialog1.execute then ExistFile := opendialog1.filename; if savadialog1.execute then NewFile := savadialog1.filename; copyfile(PChar(ExisteFile),PChar(NewFile),False); cuando ejecuta el primer if todo sigue normal, pero cuando ejecuta el savedialog, entonces se cierra la aplicacion, antes de poder seleccionar el archivo donde voy a guardar. agradeceria mucho que alguien me ayudara.... gracias |
#2
|
|||
|
|||
Si ponés este código en el evento click de un botón y lo ejecutás anda perfectamente, debe haber un leve error en tu código
Saludos |
#3
|
|||
|
|||
Yo creo que es mejor así, tu idea es muy buena Roberto01
Saludos
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#4
|
|||
|
|||
gracias
el problema es que tengo en el codigo de un boton:
if opendialog1.execute then existfile := opendialog1.filename; y en el otro boton: if savedialog1.execute then newfile := savedialog1.filename; copyfile(PChar(existfile),PChar(newfile),False); el problema es cuando se ejecuta savedialog1.excute, esto provoca que se abra la ventana de save dialog, pero despues de un instante de la ventana abierta, se cierra la apliacion |
#5
|
|||
|
|||
Cita:
Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#6
|
|||
|
|||
sige el problema
mi codigo es asi mismo, pero cuando se ejecuta el save dialog da runtime error 217, despues se cierra la apliacion
|
#7
|
|||
|
|||
Pues que raro, porque ya ejecuté tu código y no me da error, porque no pones tu código completo aquí para ver que está pasando.
Te aconsejo que uses las etiquetas vB para poder entender bien el código delphi. Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney |
#8
|
|||
|
|||
gracias por ayudarme
procedure TForm1.Copiar1Click(Sender: TObject);
begin if OpenDialog1.Execute then MyCopy.ExistFile := OpenDialog1.FileName; end; procedure TForm1.Pegar1Click(Sender: TObject); begin if SaveDialog1.Execute then begin MyCopy.NewFile := SaveDialog1.FileName; MyCopy.Copy; end; Memo1.Lines.Add(MyCopy.ExistFile); Memo2.Lines.Add(MyCopy.NewFile); end; MyCopy es una clase donde implemento copyfile, eso esta ok el problema es en el evento pegar |
#9
|
||||
|
||||
Este error, ¿te da siempre que oprimes el botón pegar, o sólo cuando primero oprimes copiar y luego pegar?
// Saludos |
#10
|
|||
|
|||
este error solo es cuando oprimo copiar antes... por que lo preguntas???
|
#11
|
||||
|
||||
Pues entonces quizá por ahí esté el problema ¿no crees? Algo ocurre en el copiado que afecta la operación posterior. El error 217 es algo bastante raro:
Cita:
// Saludos |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Problema con funciones de Delphi7 | xelip | Varios | 3 | 19-03-2007 02:39:38 |
Funciones de Excel desde delphi | JuanPa1 | Servers | 3 | 14-09-2006 17:59:10 |
Funciones financieras en delphi 7.0 | cmena | Varios | 0 | 07-04-2006 21:03:20 |
Funciones en delphi | fmtidona | Varios | 2 | 05-04-2006 14:41:55 |
Grafica de Funciones con Delphi | jlporatti | Gráficos | 1 | 08-06-2005 19:16:01 |
|