Как закрыть форму вызовом обработчика внутри формы?
Есть форма Form1, на ней кнопка Button1. При загрузке формы происходит обработка некоторой информации и потом форма должна закруться вызовом обработчика Button1Click(0)
Но почему-то форма не закрывается.
Клик по самой кнопке Button1 закрывает форму.
Почему невозможно закрыть форму вызовом обработчика в самой форме?
Но почему-то форма не закрывается.
Клик по самой кнопке Button1 закрывает форму.
Почему невозможно закрыть форму вызовом обработчика в самой форме?
Код:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
//...
Button1Click(0);
}
//---------------------
void __fastcall TForm1::Button10Click(TObject *Sender)
{
Form1->Close();
}
{
//...
Button1Click(0);
}
//---------------------
void __fastcall TForm1::Button10Click(TObject *Sender)
{
Form1->Close();
}
Если код такой же как приведен - то вызываются разные обработчики - форму закрывает Button10Click, а вызвать пытаются Button1Click.
Хороший пример почему не нужно использовать имена по умолчанию.
Кроме того - можно вызывать обработчик непосредственно для кнопки:
Хороший пример почему не нужно использовать имена по умолчанию.
Кроме того - можно вызывать обработчик непосредственно для кнопки:
Код:
Button1->Click();
Там была описка, когда код набирал - только Button1Click (ноль лишним записал).
Но и такой код не работает:
Может дело в том, где Button1->Click(); вызывается? Может в FormCreate() вызывать запрещено?
Нормально вызывается в других обработчиках.
Но и такой код не работает:
Код:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
//...
Button1->Click();
}
//---------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form1->Close();
}
{
//...
Button1->Click();
}
//---------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form1->Close();
}
Нормально вызывается в других обработчиках.
Решение нашёл. В обработчике FormCreate(), похоже, запрещено вызывать закрытие формы.
Нужно вместо обработчика Button1Click() написать обработчик FormShow()
Нужно вместо обработчика Button1Click() написать обработчик FormShow()
Код:
void __fastcall TForm1::FormShow(TObject *Sender)
{
Close();
}
{
Close();
}