, en dit artikel beschrijft hoe het met Windows xp door toevoeging van de schaduw van de vorm.Stap 1, het creëren van een nieuwe wijziging van de vorm of de belangrijkste vorm van.In de vorm van de code, zoals frmshadow, eigen createparams (), type herschrijven, tfrmshadow = (platform), persoonlijke, privé - {} {}, open en openbare verklaringen, bescherming, een programma van werkzaamheden (VAR parameters: tcreateparams); voor de terugkeer; en, ten slotte, de voltooiing van de CTRL + shift + C. Het zal van Delphi. De uitvoering van de operationele.,, stap 2, omdat de schaduw kan alleen in Windows xp of later, moet je ervoor zorgen dat we het toevoegen van de schaduw, als we weten waar het besturingssysteem Windows xp functie is, iswinxp: Bull.,,, de Resultaten: (win32platform = = ver_platform_win32_nt), (win32majorversion > = (5) en win32minorversion > = 1); enD, laatste stap 3, voegen we de schaduw te wijzigen, stijl, windowclass punt binnen die programma tfrmshadow (var. Operationele parameters: tcreateparams); en een cs_dropshadow = 00020000 dollar, te beginnen met de opvolging; als iswinxp; en begon te params.windowclass.style:= params.windowclass.style of aan het einde van cs_dropshadow;