Estou fazendo um sistema de lan house, até criei um tópico aqui sobre ele.
Mas surgiu um pequeno problema: o 'ShowModal' está dando erro.
Criei um botão no formulário principal e dentro dele coloquei o código:
procedure TfrmMain.BtnInf1Click(Sender: TObject);
begin
frmMaq.showmodal;
end;
'frmMaq' é um pequeno formulário que criei contendo uma infiormações.
Quando mando compilar aparecem as seguintes mensagens:
umain.pas(275,3) Error: Identifier not found "frmMaq"
umain.pas(275,19) Error: Illegal expression
umain.pas(283) Fatal: There were 2 errors compiling module, stopping
Em Project Options coloquei o 'frmMain' como Auto-Create e o frmLogin e frmMaq como Avaliable.
Junto com o código inserido no arquivo de projeto:
begin
Application.Initialize;
frmLogin := tfrmLogin.Create(application);
frmLogin.showmodal;
Application.CreateForm(TfrmMain, frmMain);
frmLogin.hide;
frmLogin.Free;
Application.Run;
end.
O programa abre primeiro o formulário de login e depois ele abre o principal.
Então é isso, o 'frmMaq' não quer aparecer com o showmodal inserido no botão.
Alguém faz idéia do que seja?
Agradeço.