Guten Tag

ich habe ein kleines problem und zwar habe ich folgenden code
Code :
1
2
3
4
5
6
7
8
9
10
11

  Window := FindWindow('Shell_TrayWnd', nil);
  showmessage(inttostr( FindWindow('Shell_TrayWnd', nil)));
  bb := TButton.Create(nil);
  bb.ParentWindow := window;
  bb.Caption := 'Start';
  bb.Width := 60;
  bb.Height:=50;
  bb.Left:=0;
  bb.visible:=true;
  bb.Top:=0;
  bb.Font.Style := [fsbold];

aber dieser scheint nicht zu gehen ich bekomme zwar ein handle in meiner msg aber es kommt kein neuer button drauf :/

was mache ich falsch?

ach ja es soll dazu dienen den Nerfigen Start Knopf zu überdecken....
da ich momentan meinen eigenen PC alarm Programiere also keine schadsoftware bzw. nicht für den der das passwort kennt