Ver Mensaje Individual
  #4  
Antiguo 07-03-2014
Avatar de aguml
aguml aguml is offline
Miembro
 
Registrado: may 2013
Posts: 885
Reputación: 11
aguml Va por buen camino
vale, solucionado, tenias razon pero me faltó poner el #include "HiloDBG.h", solo eso.
Ahora me encuentro con otros problemas.
En el hilo tengo un bucle que puede ser muy largo por lo que he creado dos botones, uno para pausar o continuar y otro para abortar y que termine el hilo.
Hice esto:

Código:
void __fastcall TFormPrincipal::ButtonAbortarClick(TObject *Sender)
{
        //Terminamos el hilo del debugger
        if(HiloDebugger != NULL)
        {
                HiloDebugger->Terminate();
                delete HiloDebugger;
        }

        //Habilitamos el boton para crear el hilo y deshabilitamos el de terminar el hilo
        ButtonDesencriptar->Enabled = true;
        ButtonEncriptar->Enabled = true;
        ButtonAbortar->Enabled = false;
        ButtonPausar->Enabled = false;
        EditDesencriptado->Enabled = true;
        EditEncriptado->Enabled = true;
        CheckBoxConfirmar->Enabled = true;
        ComboBoxRango->Enabled = true;
        FormPrincipal->RadioGroupOrigen->Enabled = true;
}
//---------------------------------------------------------------------------

void __fastcall TFormPrincipal::ButtonPausarClick(TObject *Sender)
{
        if(ButtonPausar->Caption == "Pausar")
        {
                //Aqui entra cuando pulsamos en Pausar y pausamos el hilo
                ButtonPausar->Caption = "Continuar";
                if(HiloDebugger != NULL)
                        HiloDebugger->Suspend();
        }
        else
        {
                //Aqui entra cuando pulsamos en Continuar y hacemos que el hilo siga
                ButtonPausar->Caption = "Continuar";
                if(HiloDebugger != NULL)
                        HiloDebugger->Resume();
        }
}
//---------------------------------------------------------------------------
¿Que hago mal?
Responder Con Cita