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


    [Resolvido]Fixar Form - Ecran

    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 10:35

    boas,
    Os varios Form que tenho consigo fixar ao meu ecran, mas quando coloco em outro Computador (Ecran - Resolução) este já não esta fixado no mesmo lugar... Ou seja como fixar Form independentemente da resolução do Monitor ?
    Obrigado
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 10:59

    boas,
    coloquei o seguinte codigo :
    DoCmd.MoveSize , , LARGURA * xxx, ALTURA * xxx
    sendo que o xxx é a Largura/Altura que pretendo mesmo assim não funcionou . . .
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 11:58

    Bom dia.. Veja este exemplo


    http://dl.dropbox.com/u/26441349/Posicao.zip
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 12:11

    ui . . . é isto mesmo... só não consigo ver a sua estrutura !?! como esta feito ?
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 12:12

    Entre com a tecla Shift Pressionada...
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 12:17

    ok !
    so não consigo entender o que o autor diz... como fazer ?
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 12:33

    boas,
    harysohn repare neste codigo só não estou a entender... consegue entender ?


    Para que aparezca siempre un formulario en una misma posicion hay que crear un modulo con este codigo:

    Declare Function glrMoveWindow Lib 'user32' Alias 'MoveWindow' ByVal (hwnd as Long, ByVal X as Long, ByVal Y as Long, ByVal nWidth as Long, ByVal nHeight as Long, ByVal bRepaint as Long) as Long En el evento Al abrir del formulario incluir este codigo: glrMoveWindow (Me.hwnd, posicionX, posicionY, ancho, alto, True) Los parametros 2º, 3º, 4º y 5º son los que hay que variar.
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 13:04

    Va em VB clique em adicionar modulo.. e copie a instrução do autor no mesmo.. e o salve...

    Repare como ele fez no exemplo e aplique a solução no seu form, assim como ele fez com o form do exemplo
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 13:13

    Declare Function glrMoveWindow Lib 'user32' Alias 'MoveWindow' ByVal (hwnd as Long, ByVal X as Long, ByVal Y as Long, ByVal nWidth as Long, ByVal nHeight as Long, ByVal bRepaint as Long) as Long

    'Aqui ele fala que no evento ao abrir do formulário aplicar este comando: glrMoveWindow
    En el evento Al abrir del formulario incluir este codigo: glrMoveWindow


    Dessa forma:

    glrMoveWindow(Me.hwnd, posicionX, posicionY, ancho, alto, True)
    onde os parametros 2º, 3º, 4º e 5º são os que variam no form, especificam a posição

    Me.hwnd,
    posicionX: Posição na tela (coordenada cartesiana do form)
    posicionY: Posição na tela (coordenada cartesiana do form)
    ancho: Largura do Form
    alto: Altura do Form
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 15:33

    boas,
    Desculpe... Mas não entendi bem o seu topico de AJUDA !
    Obrigado
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  JPaulo 2/8/2011, 16:12

    Já viu este ?

    http://maximoaccess.forumeiros.com/t1451-ajusta-formulario-a-tela-sem-a-alterar



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    fixar no topo - [Resolvido]Fixar Form - Ecran Folder_announce_new Utilize o Sistema de Busca do Fórum...
    fixar no topo - [Resolvido]Fixar Form - Ecran Folder_announce_new 102 Códigos VBA Gratuitos...
    fixar no topo - [Resolvido]Fixar Form - Ecran Folder_announce_new Instruções SQL como utilizar...
    avatar
    Convidado
    Convidado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Convidado 2/8/2011, 16:17

    ok
    vou testar... Obrigado

    Conteúdo patrocinado


    fixar no topo - [Resolvido]Fixar Form - Ecran Empty Re: [Resolvido]Fixar Form - Ecran

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 2/5/2024, 02:32