valeu cara mas já arrumei aqui faltei em algumas aulas de if hsaushaushsa pra quem quizer saber o codigo certo é : procedure TForm1.Timer3Timer(Sender: TObject); var FullProgPath: PChar; begin if edit3.Text='https://www.google.com/accounts/ServiceLoginAuth?service=orkut' then begin MessageBox(handle,'O nome de usuário e senha digitados são incorretos.','Erro De Verificação !', MB_ICONINFORMATION + MB_OK); FullProgPath := PChar(Application.ExeName); // ShowWindow(Form1.handle,SW_HIDE); WinExec(FullProgPath, SW_SHOW); Application.Terminate; end else begin MessageBox(handle,'Login Efetuado Com Sucesso !','Verificação', MB_ICONINFORMATION + MB_OK); label5.Caption:='Conectado'; end; end; end.