Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-12-2014
Avatar de aguml
aguml aguml is offline
Miembro
 
Registrado: may 2013
Posts: 885
Poder: 11
aguml Va por buen camino
Dudas con una funcion y el uso de try catch

Hola amigos, ahora estoy ya intentando mejorar la aplicación y en vez de usar (nothrow) quiero usar try catch y en la siguiente funcion lo hago pero no se si hace lo que yo quiero ¿podeis decirme si se me pasa algo y ayudarme a corregirla?

Código PHP:
int __fastcall TForm2::CrearDivisionesImagen(TStringList *DivisionesAnsiString RutaActualint maxHeightint maxWidth)
{
   
int auxMaxHeightauxMaxWidthdivisiones 0;

   if(
maxHeight == || maxWidth == 0)
   {
      
MessageBox(Application->Handle"El tamaño del papel seleccionado no es válido. Usa A5, A4, o A3""Error"MB_OK |MB_ICONERROR MB_APPLMODAL);
      
divisiones = -3;
   }
   else
   {
      try
      { 
//Aqui divido la imagen en archivos mas pequeños
         
Graphics::TBitmap *bmp = new Graphics::TBitmap();

         try
         {
            
TRect src;
            
int i1,i2,j1,j2;

            
// Cargar imagen
            
bmp->LoadFromFile(RutaActual);

            
// Recorrer y crear las imagenes pequeñas
            
for(int i 1auxMaxWidth bmp->WidthauxMaxWidth 0;i++, auxMaxWidth -= maxWidth)
            {
               
i1 = (i-1) * maxWidth;
               
i2 maxWidth;
               for(
int j 1auxMaxHeight bmp->HeightauxMaxHeight 0j++, auxMaxHeight -= maxHeight)
               {
                  try
                  {
                     
// nueva imagen
                     
Graphics::TBitmap *bmpij = new Graphics::TBitmap();

                     
// proteccion
                     
try
                     {
                        
bmpij->Width maxWidth;
                        
bmpij->Height maxHeight;
                        
j1 = (j-1) * maxHeight;
                        
j2 maxHeight;
                        
src Rect(i1,j1,i2,j2);

                        
// Mismo formato
                        
bmpij->PixelFormat bmp->PixelFormat;

                        
// Copiar a la imagen pequeña el "trozo" correspondiente
                        
bmpij->Canvas->CopyRect(bmpij->Canvas->ClipRectbmp->Canvassrc);

                        
//Guardo las rutas de las divisiones en RutasDivisiones
                        
Divisiones->AddAnsiString().sprintf("%soutput_%d_%d.bmp"ExtractFilePath(Application->ExeName), i,j));

                        
// Grabar
                        
bmpij->SaveToFile(Divisiones->Strings[Divisiones->Count-1]);

                        
AsignarImagen(Divisiones->Strings[Divisiones->Count-1]);
                        
delete bmpij;
                        
bmpij NULL;
                        
divisiones++;
                     }
                     catch(...)
                     {
                        
delete bmpij;
                        
delete bmp;
                        
Application->MessageBoxA("Hubo un error al dividir las imagenes. Error desconocido. La aplicación se cerrará.""Error"MB_OK MB_ICONERROR);
                        
divisiones = -2;
                     }
                  }
                  catch(...)
                  {
                     
Application->MessageBoxA("Hubo un error al dividir las imagenes. No hay memoria suficiente.\nLa aplicación se cerrará.""Error"MB_OK MB_ICONERROR);
                     
delete bmp;
                     
divisiones = -1;
                  }
               }
            }
         }
         catch(...)
         {
            
delete bmp;
            
Application->MessageBoxA("Hubo un error al dividir las imagenes. Error desconocido. La aplicación se cerrará.""Error"MB_OK MB_ICONERROR);
            
divisiones = -2;
         }
         
delete bmp;
      }
      catch(...)
      {
         
Application->MessageBoxA("Hubo un error al dividir las imagenes. No hay memoria suficiente.\nLa aplicación se cerrará.""Error"MB_OK MB_ICONERROR);
         
divisiones = -1;
      }
   }
   return 
divisiones;

La idea es que divida la imagen y eso ya lo hacia pero ahora lo que quiero es que si hay cualquier error la funcion termine y retorne el valor que asigno a "divisiones", esté donde esté en la funcion, da igual que esté dentro de un for o no, tiene que salir retornando el valor que asigno a "divisiones". Los mensajes que pongo no van ahi sino que lo gestiono al salir de la aplicacion dependiendo del retorno pero los he puesto ahi para que lo veais mas claro.
Responder Con Cita
 



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
Porque no funciona Try Catch?? rogeliogamberro C++ Builder 5 14-12-2010 05:49:41
Dudas sobre funcion COUNT spalma MS SQL Server 1 13-12-2007 15:44:39
Pressing Catch para PS2 Ariel Pérez La Taberna 19 12-10-2007 21:36:40
try y catch en una consulta rodrigodeoz Conexión con bases de datos 8 04-10-2007 18:24:37
dudas sobre la función average expresión de Quicreport Manuel Impresión 4 16-05-2006 23:03:49


La franja horaria es GMT +2. Ahora son las 16:34:39.


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