Der erste Parameter von
SendMessage ist das "Zielhandle".
Es müsste folglich so ähnlich aussehen, wenn ich mich nicht irre:
SendMessage(Button1.Handle, BCM_SETSHIELD, 0, 1);
Falls das nicht gehen sollte, dann wäre es gut, wenn du die genauen Fehlermeldungen hier einfügen könntest.
Edit: Da war einer schneller ...