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)
Última edición por Javier13 fecha: 16-08-2017 a las 21:44:46.
|