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();
}
}
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);
}