Hallo,
mir kam die Idee, die Toolbar mit einem Farbverlauf auszustatten.
Das Aussehen ist aber standardisiert. Somit habe ich versucht, eine neue Toolbarkomponente mit OnPaint-Ereignis zu programmieren, sodass ich diese Standardisierung des Aussehens umgehen kann.
Das ist mein Versuch, aber es hat keine Wirkung:
Delphi-Quellcode:
uses
Windows, Messages, SysUtils, Classes, Controls, ToolWin, ComCtrls;
type
TColoredToolBar1 = class(TToolBar)
private
{ Private declarations }
FOnPaint: TNotifyEvent;
protected
{ Protected declarations }
public
{ Public declarations }
published
{ Published declarations }
property OnPaint: TNotifyEvent read FOnPaint write FOnPaint;
end;
Ich glaube da fehlt noch was oder?