Re: [delphi-br] Re: versão do windows

2006-12-01 Por tôpico willer
Valeu cara, era o que eu precisava mesmo. - Original Message - From: Leo To: delphi-br@yahoogrupos.com.br Sent: Friday, December 01, 2006 4:00 PM Subject: Re: [delphi-br] Re: versão do windows essa tá funcionando redondinho ... unit GetWindowsVersion; interface

Re: [delphi-br] Re: versão do windows

2006-12-01 Por tôpico Anderson RB
Eu acabei de testar. abri um novo aplicativo, colei a funcao la dentro e executou uso o Delphi 7 - Original Message - From: "hernandes_sp" <[EMAIL PROTECTED]> To: Sent: Friday, December 01, 2006 1:59 PM Subject: [delphi-br] Re: versão do windows Tá dando PAU ess

Re: [delphi-br] Re: versão do windows

2006-12-01 Por tôpico Leo
n Result := 'WinME' else Result := 'Desconhecido'; end; end; end; end; end. - Original Message - From: hernandes_sp To: delphi-br@yahoogrupos.com.br Sent: Friday, December 01, 2006 2:59 PM

[delphi-br] Re: versão do windows

2006-12-01 Por tôpico hernandes_sp
Tá dando PAU essa função!!! Tem alguma Unit pra add?? Reveja a função... === --- Em delphi-br@yahoogrupos.com.br, "Anderson RB" <[EMAIL PROTECTED]> escreveu > > function OSType:Boolean; > var >osv : TOSVersionInfo; > begin > {Retor

[delphi-br] Re: versão do windows

2006-12-01 Por tôpico hernandes_sp
Retire a mensagem anterior!!! Fumegou sim... Grande abraço --- Em delphi-br@yahoogrupos.com.br, "Anderson RB" <[EMAIL PROTECTED]> escreveu > > function OSType:Boolean; > var >osv : TOSVersionInfo; > begin > {Retorna True se for XP e False para 98} > osv.dwOSVersionInfoSize := sizeof(osv); >