Установка формы авторизации

[Алексей_2012]

Ребят, привет, серьезное дело, есть проект, нужно добавить форму авторизации пользователя

Проблема в том, что форма новая имеет название Form11, а главная форма, которая должна открываться после авторизации-form1.

Нужно при запуске проекта открывать не form1, а form11, надо было изначально авторизацию делать, но вот приходится так выкручиваться, решаю проблему так:

булева переменная:

    if not student then
     begin
       form1.Hide;
     Form11.Show;

     end;

в обработчике Form1.OnShow.

Но появляется ошибка can not change OnShow visible

как-то так. Если писать showModal, то такая же ошибка, как ее исправить?

[Alex11223]

Проблема в том, что форма новая имеет название Form11, а главная форма, которая должна открываться после авторизации-form1.

Да, это и правда проблема. Надо называть формы нормально.

[Алексей_2012]

Мне так удобнее))

А вот обработчик кнопки показа формы 1, кнопка на форме 11

procedure TForm11.Button1Click(Sender: TObject);
begin


    Form1.Show;{
    form11.Hide;      }

    form1.student:=True;

end;

[FaTaL]

Открывай форму авторизации до показа главной формы в файле dpr

[BDA]

Например: http://programmersforum.ru/showpost....99&postcount=4
А тут замечания по этому примеру: http://www.programmersforum.ru/showthread.php?t=263069

[newerow1989]

Нужно при запуске проекта открывать не form1, а form11

Ответ во вложении:

procedure TForm11.FormCreate(Sender: TObject);
begin
   ShowModal;
end;

Сойдет?