MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Forms Sem bordas!! Código

    APJesus
    APJesus
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 21/09/2010

    [Resolvido]Forms Sem bordas!! Código Empty Forms Sem bordas!! Código

    Mensagem  APJesus Sáb 16 Abr 2011, 12:32

    Pessoal, Boa tarde! estou com uma pendencia que estou tentando modificar mas não consegui até o momento. Vamos lá:

    No meu form PACIENTES_GERENCIAL(este é o nome do form), tenho a campo cidade, que com o evento (se não estiver na lista) utilizo este código abaixo,Ok. Funciona no perfeito.Mas eu tenho o meu form CONF_CADASTRA_CIDADES, como escrito abaixo, sendo que defini o form para ser exibido sem bordas. Na estrutura abrindo o form em questão ele me abre normalmende (Propriedades: Bordas Nenhum),mas na hora que preencho no campo do form PACIENTES_GERENCIAL, o form de confirmação me abre com a borda diálogo. acredito que seja no código (acDialog), mas não estou conseguindo modificar. alguém pode me ajudar?

    Response = acDataErrContinue ' Inibe msg padrão do Access.
    DoCmd.OpenForm "CONF_CADASTRA_CIDADES", , , , acFormAdd, acDialog, NewData
    CIDADE = UCase(NewData) ' Converte o texto para maiúsculas.
    Response = acDataErrAdded

    desde já agradeço
    AJesus
    APJesus
    APJesus
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 21/09/2010

    [Resolvido]Forms Sem bordas!! Código Empty Re: [Resolvido]Forms Sem bordas!! Código

    Mensagem  APJesus Sáb 16 Abr 2011, 13:11

    Pessoal, Consegui acertar em parte, mas continuo ainda com um probleminha.

    Alterei o código na parte AcDialog, para AcWindowNormal, funcionou apareceu o form de confirmação sem borda como um form flutuante (LEgal), mas aí vem a dúvida. No evento ao ocorrer erro, me abre um form nesta situação. e acontece que após fiz esta modificação o form de erro abre primeiro e após eu confirmar que abre o form de confirmação de cidade. Então está gerando um erro! mas continua o processo. Fico no aguardo dos feras aqui!
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Forms Sem bordas!! Código Empty Re: [Resolvido]Forms Sem bordas!! Código

    Mensagem  vieirasoft Sáb 16 Abr 2011, 13:34

    ApJesus

    Definir tudo nas propriedades dos forms não é pior.
    APJesus
    APJesus
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 21/09/2010

    [Resolvido]Forms Sem bordas!! Código Empty Re: [Resolvido]Forms Sem bordas!! Código

    Mensagem  APJesus Sáb 16 Abr 2011, 19:39

    Vieira, Grande amigo!

    Não entendi sua colocação!!!
    Te enviei um e-mail com o aplicativo ...
    APJesus
    APJesus
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 21/09/2010

    [Resolvido]Forms Sem bordas!! Código Empty Re: [Resolvido]Forms Sem bordas!! Código

    Mensagem  APJesus Sáb 16 Abr 2011, 20:27

    Pessoal, resolvi a situação, e foi desta maneira:

    Retirei uma parte do código no evento ao ocorrer erro e foi resolvido o meu problema. agradeço a todos que visualizaram...

    DoCmd.OpenForm "ATENCAO_ERRO"
    Exit Sub
    Response = acDataErrDisplay
    Response = acDataErrContinue

    Me atende no perefito retirando esta parte...
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Forms Sem bordas!! Código Empty Re: [Resolvido]Forms Sem bordas!! Código

    Mensagem  vieirasoft Sáb 16 Abr 2011, 20:48

    Amigo

    Tive que dar uma saída e vi aqui no email. Ainda bem que resolveu. Desculpe e abraço.

    Conteúdo patrocinado


    [Resolvido]Forms Sem bordas!! Código Empty Re: [Resolvido]Forms Sem bordas!! Código

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Sex 22 Nov 2024, 20:11