Control in Abhängigkeit der Windowsversion verwenden

Hallo zusammen,

ist es möglich ein Control in Abhängigkeit der Windowsversion zu verwenden???

Die grundlegenden Eigenschaften sind identisch, nur erzeugt das Control unter Vista ein völlig anderes Verhalten als unter den vorherigen Windowsversionen. Daher suche ich nach einer (einfachen) Möglichkeit in Abhängigkeit von der OS-Version ein Control zu verwenden, ohne den kompletten Code quasi zweimal zu schreiben.

Beispiel:

zusammenfalten · markieren

Delphi-Quellcode:

			var

  AControl: TObject;

begin

if WinVista then

  AControl := TSomeControl.Create(self)

else

  AControl := TAnotherControl.Create(self);

with AControl do begin

  // tue irgendwas 

end;

Control in Abhängigkeit der Windowsversion verwenden

Control in Abhängigkeit der Windowsversion verwenden

Forumregeln