- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Maximizar Modelo2()
×
Linguagem de Programação ADVPL
Perguntas Maximizar Modelo2()
- vcardoso
- Autor do Tópico
- Desconectado
- Membro Especialista
Menos
Mais
- Postagens: 119
- Obrigados Recebidos: 0
10 anos 8 meses atrás #21766
por vcardoso
Maximizar Modelo2() foi criado por vcardoso
Galera, bom dia.
Estive lendo sobre como maximizar o Modelo2() e consegui encontrar algumas soluções, mas não consegui aplica-las.
Caso alguém já tenha maximizado o modelo2(), poderia me ajudar?
Grato!
Estive lendo sobre como maximizar o Modelo2() e consegui encontrar algumas soluções, mas não consegui aplica-las.
Caso alguém já tenha maximizado o modelo2(), poderia me ajudar?
Grato!
Por favor Acessar ou Registrar para participar da conversa.
- vcardoso
- Autor do Tópico
- Desconectado
- Membro Especialista
Menos
Mais
- Postagens: 119
- Obrigados Recebidos: 0
- lalberto
- Desconectado
- Administrador
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
10 anos 8 meses atrás #21782
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Maximizar Modelo2()
Tenta usar o vetor acoord deste jeito:
aCoord := MsAdvSize(.T.,.T.)
aCoord := MsAdvSize(.T.,.T.)
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
- Desconectado
- Administrador
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
10 anos 8 meses atrás #21783
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Maximizar Modelo2()
Segue outro exemplo:
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Array com coordenadas da GetDados no modelo2 ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
aSize := MsAdvSize()
aAdd(aObjects, {100, 80, .T., .F.})
aAdd(aObjects, {100, 360, .T., .T.})
aInfo := {aSize[1], aSize[2], aSize[3], aSize[4], 2, 2}
aPosObj := MsObjSize(aInfo, aObjects)
aRodape := {}
aCGD := {aPosObj[2,1],aPosObj[2,2],aPosObj[2,3],aPosObj[2,4]}
aTela := {aSize[7],0,aSize[6],aSize[5]}
cTudoOk := "AllwaysTrue()"
cLinhaOk:= "T_CB090LOK()"
lRetorno := Modelo2(cTitulo,aCabec,aRodaPe,aCGD,nOpcx,cLinhaOk,cTudoOk,,,"CBJ_ITEM",,aTela)
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Array com coordenadas da GetDados no modelo2 ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
aSize := MsAdvSize()
aAdd(aObjects, {100, 80, .T., .F.})
aAdd(aObjects, {100, 360, .T., .T.})
aInfo := {aSize[1], aSize[2], aSize[3], aSize[4], 2, 2}
aPosObj := MsObjSize(aInfo, aObjects)
aRodape := {}
aCGD := {aPosObj[2,1],aPosObj[2,2],aPosObj[2,3],aPosObj[2,4]}
aTela := {aSize[7],0,aSize[6],aSize[5]}
cTudoOk := "AllwaysTrue()"
cLinhaOk:= "T_CB090LOK()"
lRetorno := Modelo2(cTitulo,aCabec,aRodaPe,aCGD,nOpcx,cLinhaOk,cTudoOk,,,"CBJ_ITEM",,aTela)
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Maximizar Modelo2()
Tempo para a criação da página:0.120 segundos