Cita:
Empezado por Javier13
Aquí solo estoy subiendo la imagen en el TcxDBImage
pdDoc.InitialDir := GetCurrentdir();
pdDoc.Execute;
try
edDocumento.Picture.LoadFromFile(pdDoc.FileName);
except
end;
Y quiero que antes de que la suba si pesa la imagen más de 500 k le harroje un mensaje para que escoja una que pese menos es todo.
(Calcular el tamaño para restringir movorack)
|
Entonces, tomando en cuenta cualquiera de los enlaces que acertadamente te puso
Casimiro, solo deberas averiguar el tamaño del archivo cuyo nombre se encuentra en:
pdDoc.FileName
Saludos