예제 #1
0
void __fastcall TFormClasificacion::Nuevotorneo1Click(TObject *Sender)
{
if (MessageDlg("Va a comenzar un torneo nuevo. Los cambios no guardados se perderán. ¿Desea continuar?",mtConfirmation,TMsgDlgButtons()<<mbYes<<mbNo,0)==mrYes)
        {
        torneo_limpiar(t);
        torneo_inicializar(t);
        MostrarClasificacion();
        }
}
예제 #2
0
void __fastcall TFormClasificacion::crear_clasificacion(TObject *Sender)
{
        torneo_inicializar(t);
        MostrarClasificacion();
}
void __fastcall TFormClasificacion::ButtonLimpiarClick(TObject *Sender)
{
torneo_inicializar(t);
MostrarClasificacion();
}
void __fastcall TFormClasificacion::FormDestroy(TObject *Sender)
{
 torneo_inicializar(t);
}