, en dit artikel demonstrates hoe aan de start knop aan de ramen, de procedure in, hideStartbutton (visi:boolean);,,, tray, var, kind:.;,, C: Array[0..127] van Char;,, s: touw;,,, FindWindow beginnen, meneer: = ('Shell_TrayWnd', Nils);,, kind: = GetWindow (tray, GW_CHILD);,, terwijl het kind < > 0 doen, beginnen,, als GetClassName (Child, C, SizeOf (C))% GT% 0 dan, beginnen, S = StrPAS (C); en, als UpperCase (s) ='BUTTON'dan, ik startbutton_handle:=child;,,,,, als visi dan showwindow (Child, 1) anders showwindow (Child 0);,,,,,,,,,,, kind: = GetWindow (Child, GW_HWNDNEXT);,,,,,,,,,,