cambiar tamaño de imagen jpg
hola amigos
Tengo una form donde cargo una imagen en un DBImage, anteriormente habia preguntado como cargar un jpg ahora lo que necesito es saber como redimensionar este jpg o sea cambiar el tamaño de la imagen en pixeles ejemplo de 800x600 a 100x100 y el tamaño en fisico ejemplo de 500 Kb a 150Kb.
les dejo el código para que le hechen un ojo
Gracias de antemano
Código:
if(OpenDialog1->Execute())
{
if (OpenDialog1->FileName == "")
{
if (OpenDialog1->FileName == "")
{
MessageDlg("Operación cancelada" , mtInformation, TMsgDlgButtons() << mbOK, 0);
}
else
{
//obtener la extension del fichero seleccionado
b = OpenDialog1->FileName.Length() - 3;
a = OpenDialog1->FileName.Delete(1,b);
a = a.LowerCase();
if (a == "bmp" || a == "BMP")
{
DBImage1->Picture->LoadFromFile(OpenDialog1->FileName);
}
if (a == "jpg" || a == "jpeg" || a == "JPG" || a == "JPEG")
{
// Carga en memoria el fichero
jpg->LoadFromFile(OpenDialog1->FileName);
//convertir
bmp->Assign(jpg);
//poner convertido en la imagen
DBImage1->Picture->Assign(bmp);
//limpiar memoria
delete jpg;
delete bmp;
}
}
}
}
TFileStream *File = new TFileStream(OpenDialog1->FileName, fmOpenRead);
if (File->Size >= 600000)
{
MessageDlg("La imagen es demasiado grande, debe ser menor de 600000 bytes y su tamaño actual es " + IntToStr(File->Size) + " bytes", mtError, TMsgDlgButtons() << mbOK, 0);
delete File;
}
else
{
ADOQuery2->Post();
}
__________________
Nunca esta de más volver a ver la "Guia de Estilo" o "La Otra Guia de Estilo". Recuerda siempre usar los "Tags" para una mejor legibilidad de tu código.
Cuando miras fijamente al abismo, este te devuelve la mirada
oo______ooo_____ooo_ooooooo_____ooo____oooooo____ooooooo______oooo____ooo____oo_
oo______oooo___oooo_oo____oo__oo___oo__oo____oo__oo____oo___oo____oo__oooo___oo_
oo______oo_oo_oo_oo_oo____oo_oo_____oo_oo_____oo_oo____oo__oo______oo_oo_oo__oo_
oo______oo__ooo__oo_oooooo___ooooooooo_oo_____oo_ooooooo___oo______oo_oo__oo_oo_
oo______oo_______oo_oo_______oo_____oo_oo____oo__oo____oo___oo____oo__oo___oooo_
ooooooo_oo_______oo_oo_______oo_____oo_oooooo____oo_____oo____oooo____oo____ooo_
________________________________________________________________________________
Última edición por lmpadron fecha: 02-12-2011 a las 17:22:25.
|