Konnte nicht umhin 'ne kleine Kompo dafür zu schreiben 8)
Benutzung ist denkbar einfach:
Delphi-Quellcode:
uses
SizeGripThemed;
procedure TForm1.FormCreate(Sender: TObject);
begin
// ...
TSizeGripThemed.Create(Self);
end;
Source siehe Anlage oder
hier.
Screenshot zeigt alle drei Varianten (auf die rechte untere Ecke achten).