View Full Version : Verificar resulucção de um utilizador..


Psico_Mind
14-01-2006, 20:25
Fiz uma aplicação para 800 x 600 ( pcs da escola sukam :-D ) mas queria que cada vez que alguem abrisse numa resolucção diferente, dizesse. eu sei que o codigo para dizer a resulucção é este:

CR$ = Chr$(13) + Chr$(10)
TWidth% = screen.Width \ screen.TwipsPerPixelX
THeight% = screen.Height \ screen.TwipsPerPixelY
MsgBox "Screen Resolution:" + CR$ + CR$ + Str$(TWidth%) + " x" + Str$(THeight%), 64, "Info"

Mas como é que a partir daqui verifco isso :| if twidth not 800 ? =x lol

Mitch
14-01-2006, 21:39
convinha perceber o que estás a escrever... :S

zx-9r
14-01-2006, 22:08
que raio de escrita

[N]
14-01-2006, 22:34
k linguagem é essa? com cereteza que se pesquisasses na net encontravas...

Psico_Mind
14-01-2006, 23:06
[N] foi a pesquisar na net que já encontrei esse codigo.. :016:
não encontrei a explicar especificamente como verificar..
o que não perceberam? bem, eu acho que o vb é o unico a usar msgbox mas não sei, não percebo nada disto :-D

não entendi o que não perceberam.. que eu tenha visto só me enganei a escrever resolução ;p e pus 2 zz em vez de ss no dissesse.. escrevi a pressa, mas dai a não perceberem..

Mitch
14-01-2006, 23:33
que eu tenha visto só me enganei a escrever resolucção

e continuas a enganar-te :-D

Psico_Mind
14-01-2006, 23:48
corrigido.. mas já basta de :smlot:

ilovewww
15-01-2006, 16:08
Eu consegui perceber bem..

Se se deixassem de hipocrisias e tentassem ajudar o rapaz a sério perceberiam..

Scalius
20-01-2006, 00:03
Fiz uma aplicação para 800 x 600 ( pcs da escola sukam :-D ) mas queria que cada vez que alguem abrisse numa resolucção diferente, dizesse. eu sei que o codigo para dizer a resulucção é este:

CR$ = Chr$(13) + Chr$(10)
TWidth% = screen.Width \ screen.TwipsPerPixelX
THeight% = screen.Height \ screen.TwipsPerPixelY
MsgBox "Screen Resolution:" + CR$ + CR$ + Str$(TWidth%) + " x" + Str$(THeight%), 64, "Info"

Mas como é que a partir daqui verifco isso :| if twidth not 800 ? =x lol

Se entendi o que pretendes apenas tens que colocar este codigo (ou uma funcao que o chame) no arranque da aplicaçao e fazer:
if TWidth% <> 800 then
#Nao sei o q pretendes fazer quando a resolucao nao for 800x600
msgbox "Vao por a resolucao bem!!!!!"
end if

Espero que a sintaxe esteja correcta.


Se for outra a tua duvida peço que esclareças melhor.

Portem-se!