[Kompo] TWindowsVersionsInfo - Kompo zur Windowserkennung

[Luckie]

Im ersten Posting ist doch ein ausführliches Beispiel dabei:

Delphi-Quellcode:

wvi := TWindowsVersionInfo.Create(self); 

Edit_ComplString.Text :=  wvi.WindowsVersionsString; 
Edit1.Text := wvi.ServicePack; 
Edit2.Text := IntToStr( wvi.MajorVersion ); 
Edit3.Text := IntToStr( wvi.MinorVersion ); 
Edit4.Text := IntToStr( wvi.BuildNumber );