Edit_TxT_PdF
Moderator: Rathinagiri
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Edit_TxT_PdF
Hola a todos
He dejado en archivos de esta web dos versiones para pasar ficheros
de TXT a PDF uno está compilado con minigui Oficial y otro con ooHG
si alguien los puede revisar, me da algun error cuando cambio de carpetas y para
que no "explote" el programa como vulgarmente se dice le he puesto mensajes para
evitar el cuelgue.
Haber si la gente se anima a compartir porque es la mejor escuela
para aprender, los que venimos del Jurasico con el Clipper Summer 87
la nueva programacion de minigui casi respeta todas las formas del
antiguo lenguajes, pero necesitamos ejemplos para poder reciclarnos.
Un saludo a todos.
Hello everyone
I have left files on this website to pass two files
TXT to PDF is compiled with a mini and another ooHG Official
if someone can check, I get an error when you change folders and
not "explode" as the expression goes, I have messages for you
avoid the crash.
Have if people are encouraged to share because it is the best school
to learn, which come from the Jurassic to the Clipper Summer 87
the new programming mini respects almost all forms of
ancient languages, but examples need to be able to recycle them.
Greetings to all.
Mustafa López
He dejado en archivos de esta web dos versiones para pasar ficheros
de TXT a PDF uno está compilado con minigui Oficial y otro con ooHG
si alguien los puede revisar, me da algun error cuando cambio de carpetas y para
que no "explote" el programa como vulgarmente se dice le he puesto mensajes para
evitar el cuelgue.
Haber si la gente se anima a compartir porque es la mejor escuela
para aprender, los que venimos del Jurasico con el Clipper Summer 87
la nueva programacion de minigui casi respeta todas las formas del
antiguo lenguajes, pero necesitamos ejemplos para poder reciclarnos.
Un saludo a todos.
Hello everyone
I have left files on this website to pass two files
TXT to PDF is compiled with a mini and another ooHG Official
if someone can check, I get an error when you change folders and
not "explode" as the expression goes, I have messages for you
avoid the crash.
Have if people are encouraged to share because it is the best school
to learn, which come from the Jurassic to the Clipper Summer 87
the new programming mini respects almost all forms of
ancient languages, but examples need to be able to recycle them.
Greetings to all.
Mustafa López
- Attachments
-
- Edit_TxT_PdFOficial.zip
- (732.15 KiB) Downloaded 581 times
- esgici
- Posts: 4543
- Joined: Wed Jul 30, 2008 9:17 pm
- DBs Used: DBF
- Location: iskenderun / Turkiye
- Contact:
Re: Edit_TxT_PdF
Hola Mustafamustafa wrote: ...if someone can check, I get an error when you change folders and
not "explode" as the expression goes...
How are you ?
In the Edit_TxT_PdF.prg file you have
SET DEFAULT TO C:\Edit_TxT_PdF
line repeated 3 time ( lines 203, 220 and 237 )
Simply extract ( delete or comment ) these lines.
I hope this will solve the problem.
Saludos Cordiales.
--
Esgici
Viva INTERNATIONAL HMG
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Edit_TxT_PdF
esgici wrote:Hola Mustafamustafa wrote: ...if someone can check, I get an error when you change folders and
not "explode" as the expression goes...
How are you ?
In the Edit_TxT_PdF.prg file you have
SET DEFAULT TO C:\Edit_TxT_PdF
line repeated 3 time ( lines 203, 220 and 237 )
Simply extract ( delete or comment ) these lines.
I hope this will solve the problem.
Saludos Cordiales.
--
Esgici
Hola amigo Esgici
Creo que no funciona si suprimo
SET DEFAULT TO C:\Edit_TxT_PdF
y intento leer algun fichero ejemplo de
la sub_carpeta Doc_TXT al cargar el fichero
me da error DBFNTX/1001 Open Error
tambien pasa lo mismo si creo un texto y lo grabo en
sub_carpeta Doc_TXT o cuualquier otra que no sea la principal C:\Edit_TxT_PdF
y aparte de este problema el visor de ficheros lo queria contruir con:
@ 135,160 RICHEDITBOX Edit_1 WIDTH 586 HEIGHT 530;
BACKCOLOR {183,214,255} ;
VALUE cContenido ;
TOOLTIP 'Escriba Texto y grabelo'
compilado con QAC y ooHG no da ningun error
pero en Minigui Oficial si entonces he tenido que hacerlo con
DEFINE EDITBOX Edit_1
ROW 135
COL 160
WIDTH 586
HEIGHT 530
BACKCOLOR {183,214,255}
VALUE cContenido
FONTNAME 'Courier New'
FONTSIZE 9
TOOLTIP 'Escriba Texto y grabelo'
END EDITBOX
*-----------------------------------------------------------*
Hola amigo Esgici
I think it does not work when I delete
SET DEFAULT TO C: \ Edit_TxT_PdF
and any attempt to read file example
sub_carpeta Doc_TXT loading the file
I get error Error DBFNTX/1001 Open
The same also happens if I create a text and will burn
in sub_carpeta Doc_TXT or cuualquier other than the main C: \ Edit_TxT_PdF
and apart from this problem the display of files I wanted to construct:
@ 135.160 RICHEDITBOX Edit_1 WIDTH 586 HEIGHT 530;
BackColor (183,214,255);
VALUE cContenido ;
ToolTip 'Enter Text and burn'
QAC ooHG compiled and gives no error
Official Miniguí but then if I had to do with
DEFINE EDITBOX Edit_1
ROW 135
COL 160
WIDTH 586
HEIGHT 530
BackColor (183214255)
VALUE cContenido
FONTNAME 'Courier New'
Fontsize 9
ToolTip 'Enter Text and burn'
END EDITBOX
A big hug friend I have been there twice in Istanbul if you come to Spain
Mustafa López
- Attachments
-
- Error1001.jpg (25.97 KiB) Viewed 7909 times
- esgici
- Posts: 4543
- Joined: Wed Jul 30, 2008 9:17 pm
- DBs Used: DBF
- Location: iskenderun / Turkiye
- Contact:
Re: Edit_TxT_PdF
Hola Mustafa
I had tested here and it worked fine.
Only one point : for compiling with HMG you have extract (delete or commnet) #include 'miniprint.ch' (third) line from TPRINTO.prg.
Saludos a la ciudad de las luces
--
Esgici
Are you sure that you had deleted 3 (three) lines ?mustafa wrote: I think it does not work when I delete
SET DEFAULT TO C: \ Edit_TxT_PdF
I had tested here and it worked fine.
Only one point : for compiling with HMG you have extract (delete or commnet) #include 'miniprint.ch' (third) line from TPRINTO.prg.
Saludos a la ciudad de las luces
--
Esgici
Viva INTERNATIONAL HMG
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Edit_TxT_PdF
esgici wrote:Hola Mustafa
Are you sure that you had deleted 3 (three) lines ?mustafa wrote: I think it does not work when I delete
SET DEFAULT TO C: \ Edit_TxT_PdF
I had tested here and it worked fine.
Only one point : for compiling with HMG you have extract (delete or commnet) #include 'miniprint.ch' (third) line from TPRINTO.prg.
Saludos a la ciudad de las luces
--
Esgici
Hola
te mando una copia , yo creo que lo he efectuado como tu me has indicado, pero sale el error que te he puesto en un fichero jpg, siempre ocurre cuando quieres coger un fichero txt de la sub_carpeta Doc_TXT y cargarlo para hacer la conversión , lo mismo ocurre si creas un texto txt y lo quieres grabar en otra carpeta sale el mismo error. si lo puedes corregir mandame una copia
de los prg a mi e-mail mustalopez@gmail.com o pon un attached
Hello
give you a copy, I think I've done as you've shown me, but you get the error that I have a jpg file, always happens when you take one of the txt file and load sub_carpeta Doc_TXT to make the conversion, the same applies if you create a txt and text you want to record in another folder gives the same error. if you can send a corrected copy
prg for my e-mail or put a mustalopez@gmail.com attached
Salam Esgici
e-mail correct mustalopez@gmail.com
- Attachments
-
- Edit_TxT_PdF.zip
- (841.96 KiB) Downloaded 415 times
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Edit_TxT_PdF
mustafa wrote:esgici wrote:Hola Mustafa
Are you sure that you had deleted 3 (three) lines ?mustafa wrote: I think it does not work when I delete
SET DEFAULT TO C: \ Edit_TxT_PdF
I had tested here and it worked fine.
Only one point : for compiling with HMG you have extract (delete or commnet) #include 'miniprint.ch' (third) line from TPRINTO.prg.
Saludos a la ciudad de las luces
--
Esgici
Hola
te mando una copia , yo creo que lo he efectuado como tu me has indicado, pero sale el error que te he puesto en un fichero jpg, siempre ocurre cuando quieres coger un fichero txt de la sub_carpeta Doc_TXT y cargarlo para hacer la conversión , lo mismo ocurre si creas un texto txt y lo quieres grabar en otra carpeta sale el mismo error. si lo puedes corregir mandame una copia
de los prg a mi e-mail mustalopez@gmail.com o pon un attached
Hello
give you a copy, I think I've done as you've shown me, but you get the error that I have a jpg file, always happens when you take one of the txt file and load sub_carpeta Doc_TXT to make the conversion, the same applies if you create a txt and text you want to record in another folder gives the same error. if you can send a corrected copy
prg for my e-mail or put a mustalopez@gmail.com attached
Salam Esgici
e-mail correct mustalopez@gmail.com
Nota Final: Bicahi Esgici a corregido el fallo en Public ha colocado
cPrgFolder: GetCurrentFolder = ()
y en las Procedures BuscaFicheroF, BuscaFichero, TextoGraba , Borrax
SetCurrentFolder( cPrgFolder )
con esto queda solucionado el error que se producia al cambiar de sub_carpeta.
21-05-2009
dejo una copia compilada.
Saludos a todos
Final Note: Bicahi Esgici to correct the fault has been placed in Public
cPrgFolder: GetCurrentFolder = ()
and the Procedures BuscaFicheroF, BuscaFichero, TextoGraba, Borrax
SetCurrentFolder (cPrgFolder)
this is fixed the error that occurred when changing sub_carpeta.
21-05-2009
and I compiled a copy.
Greetings to all
Mustafa Lopez
- Attachments
-
- Edit_TxT_PdF.zip
- (736.45 KiB) Downloaded 444 times
- Rathinagiri
- Posts: 5471
- Joined: Tue Jul 29, 2008 6:30 pm
- DBs Used: MariaDB, SQLite, SQLCipher and MySQL
- Location: Sivakasi, India
- Contact:
Re: Edit_TxT_PdF
Thanks a LOT.
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
South or North HMG is worth.
...the possibilities are endless.
- mustafa
- Posts: 1162
- Joined: Fri Mar 20, 2009 11:38 am
- DBs Used: DBF
- Location: Alicante - Spain
- Contact:
Re: Edit_TxT_PdF
Hola a Todosrathinagiri wrote:Thanks a LOT.
He modificado en opcion "Grabar un TxT" no se tenga que escribir la extension TXT es decir solo poner el nombre del nuevo fichero, lo malo es que si guardais encima de un fichero.txt existente se crea el mismo con doble extension ejemplo document.txt.txt
Tambien en opcion de "Borrar TXT" hago que se cargue el fichero a borrar ,para que se pueda ver el contenido escrito y asi no haya dudas.
Tambien en Fichero GenPDF2.prg para construir el nuevo PDF hay tres opciones con * para si se quiere puedan ser activadas, cargar foto, cambio de color tinta, y hacer una linea recta de adorno.
Dejo en Attache el nuevo fichero compilado.
Hello All
I changed "Save a txt" is not taken TXT extension to write it only put the
name of the file, the bad news is that if you keep on top of an existing file.txt is created with the same double extension such document.txt.txt
Also in option "Delete TXT" do you load the file to delete so you can see the content and so no doubt.
Also in File GenPDF2.prg to build the new PDF are three options if you want * to be activated, upload photo, color changing ink, and make a straight line ornament.
I leave in the new attached file compiled
Mustafa López
- Attachments
-
- Edit_TxT_PdF_Oficial.zip
- (918.75 KiB) Downloaded 471 times
Re: Edit_TxT_PdF
Muchas Gracias!mustafa wrote:Dejo en Attache el nuevo fichero compilado.rathinagiri wrote:Thanks a LOT.
Mustafa López
Saludos, Fernando Chirico.
Saludos, Fernando Chirico.
- esgici
- Posts: 4543
- Joined: Wed Jul 30, 2008 9:17 pm
- DBs Used: DBF
- Location: iskenderun / Turkiye
- Contact:
Re: Edit_TxT_PdF
Hola Mustafamustafa wrote: I changed "Save a txt" is not taken TXT extension to write it only put the name of the file, the bad news is that if you keep on top of an existing file.txt is created with the same double extension such document.txt.txt
Please try to adding
Code: Select all
IF "." $ Cfile
CfileD := Cfile
ELSE
CfileD := Cfile+".txt"
ENDIF
cContenido := Frm_1.Edit_1.value
and
SetCurrentFolder( cPrgFolder )
Saludos
--
Esgici
Viva INTERNATIONAL HMG