copiar fichero mas de 2Gb con esta funcion

[roman]

Si no me equivoco, 2GB es aproximadamente lo que puede representarse con un integer que es el tipo de datos de la propiedad Max del ProgressBar. No sé si no te copia todo el archivo o simplemente no queda bien la barra. En tal caso deberás hacer una escala para que quede bien.

// Saludos

[roman]

¡Ah! Ya veo. Además de la barra de progreso sí tienes problemas en la copia ya que usas un LongInt para la longitud del archivo y LongInt viene a ser lo mismo que el integer. Puedes cambiar por un LongWord, lo que te doblará la capacidad, o mejor un Int64.

// Saludos

[roman]

Je, je, otro problema: FileSize regresa un integer

Supongo que te puedes arreglar directamente con la función GetFileSize de la API Windows.

// Saludos

pd: no tengo a la mano un archivo tan grande como para probar