, denne artikel forklarer, hvordan at manipulere form, udseende på vinduer xp ved at lægge drop shadow virkning.trin 1, at skabe en ny form for eller ændre vigtigste form.kode, f.eks. i form frmshadow tilsidesætte createparams() metode med din egen, type:, tfrmshadow = klasse (tform), private, offentlige og private erklæringer (} {offentlige erklæringer), beskyttet, procedure createparams (var - params: tcreateparams); gearvalg;, fuldstændig form erklæring ved presning af ctrl + forskydning + c. delphi ide vil tilføje implementaion af createparams.,, trin 2, fordi drop shadow virkning kan kun arbejde på vinduer xp eller senere, skal du sørge for, at vi tilføjer drop shadow kun, når vi ved er operativsystemet vinduer xp., funktion iswinxp: boolean, begynder, resultat: = (win32platform = ver_platform_win32_nt) og (win32majorversion > = 5) og (win32minorversion > = 1); end, trin 3, sidste tilføjer vi drop shadow virkning af modifiying, stil, af windowclass lidt i createparams. procedure tfrmshadow. createparams (var - params: tcreateparams), i denne cs_dropshadow = $00020000; begynder arvede, hvis iswinxp så begynde params.windowclass.style: = params.windowclass.style eller cs_dropshadow;,