PROBLEMA COM A RESOLUCAO

USUARIO.EXCLUIDOS 10/11/2004 09:27:37
#49693
Como eu faço para ajustar automaticamente o meu programa quando ele passar de uma resolucao (video) 1024x768 para 800x600 ??
USUARIO.EXCLUIDOS 10/11/2004 09:35:14
#49694 Resposta escolhida
Conhece o controle SysInfo da Microsoft?

Adicione o seguinte componente.

Microsoft SysInfo Control 6.0

e adicione o seguinte código no evento DisplayChanged

Private Sub SysInfo1_DisplayChanged()
    MsgBox Screen.Height & "x" & Screen.Width
End Sub
USUARIO.EXCLUIDOS 10/11/2004 09:45:43
#49697
Simples

Private Sub SysInfo1_DisplayChanged() 
    Form1.height = screen.height
    Form1.width = screen.width
End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar