Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 13-03-2009
ISEKO ISEKO is offline
Registrado
 
Registrado: oct 2008
Posts: 5
Poder: 0
ISEKO Va por buen camino
¿Existe la función "Truncate" en Delphi?

Necesito ayuda para poder truncar un archivo mayor de 4Gbytes, pues truncate(f: file) de delphi, no lo permite.
seria de mucha ayuda resolver esto pues estoy en terminación de un sotf importante, por la ayuda podra constar en los agradecimientos del mismo.

por favor indicarme o suministrame algun codigo para solucionar el problema.

muchas gracias de antemano.

Última edición por ISEKO fecha: 13-03-2009 a las 22:17:24.
Responder Con Cita
  #2  
Antiguo 13-03-2009
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Hasta donde yo llego no existe algo así, pero, puede hacerse. Este hilo, por ejemplo, igual te da alguna idea.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #3  
Antiguo 14-03-2009
ISEKO ISEKO is offline
Registrado
 
Registrado: oct 2008
Posts: 5
Poder: 0
ISEKO Va por buen camino
Gracias por la respuesta David pero no me ayuda mucho.

Replanteare la pregunta:

Tengo un archivo ISO con 5.6 Gbytes y necesito truncarlo a 3.8 Gbytes, no son campos, son bytes consecutivos, es en realidad un archivo ISO, solo que mayor de 4 Gigabytes.

necesito alguna aplicacion en delphi para esto, o una recomendacion para crear el procedimiento de truncar con una API de windows.

Muchas gracias.
Responder Con Cita
  #4  
Antiguo 14-03-2009
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

En Delphi About se puede ver al menos una técnica para cortar y unir archivos. Es algo similar a lo que se expone en el hilo de arriba, pero, creo que aún sería mejor este último, pues el archivo a cortar se lee "poco a poco". Claro que igual no he comprendido bien el asunto, ni la función "Truncate". Ahora pienso que acaso te refieres a comprimir el archivo... para eso cuentas con componentes de terceros para Delphi y distintas bibliotecas en las que basarte. En estos mismos foros encontrarás más información sobre esto último.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #5  
Antiguo 14-03-2009
ISEKO ISEKO is offline
Registrado
 
Registrado: oct 2008
Posts: 5
Poder: 0
ISEKO Va por buen camino
Gracias de nuevo David.

Ya he dado con una solucion en las API de Windows, y no es otra que utilizar una funcion llamada:

Código:
SetEndOfFile(lhandle: cardinal):  longbool;
Un saludo.
Responder Con Cita
  #6  
Antiguo 14-03-2009
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Pues sí que iba yo desencaminado, sí.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Existe en Delphi esta función de redondeo Faust Varios 5 10-01-2009 00:28:43
truncate y round berfer Firebird e Interbase 3 17-09-2006 19:05:19
Mal funcionamiento de truncate en firebird Ivanzinho Firebird e Interbase 6 02-12-2005 17:29:16
deshacer truncate Novás MySQL 3 19-08-2004 11:42:39
Existe TRUNCATE TABLE ? a.chavez SQL 2 04-08-2003 09:27:55


La franja horaria es GMT +2. Ahora son las 11:40:38.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi