W odcinku 8 (Notatnik) kursu pana Mirosława Zelenta chciałem rozbudować opcję "Nowy". Kod nie daje żadnych błędów, ale gdy w wyskakującym okienku wybiorę coś innego niż tak (nie, anuluj, zamknij (X)), to okienko się zamyka po czym natychmiast otwiera się ponownie. Drugie okienko działa już poprawnie.
if(tresc -> Lines -> Count == 0)
{
tresc -> Lines -> Clear();
nazwapliku="";
}
else
{
if(Application->MessageBox("Czy chcesz zapisać zmiany w pliku?","Potwierdź",
MB_YESNOCANCEL | MB_ICONQUESTION) == IDYES)
{
Form1 -> Zapisz1Click(MainMenu1);
}
else if(Application->MessageBox("Czy chcesz zapisać zmiany w pliku?","Potwierdź",
MB_YESNOCANCEL | MB_ICONQUESTION) == IDNO)
{
tresc -> Lines -> Clear();
nazwapliku="";
}
}