Hallo Michael,
hier mal eine kurze Quick'n'Dirty-Anleitung:
- TBXDock aufs Form ziehn
- TBXToolBar auf das Dock setzen und mit Doppelklick in den ToolBar-Editor reingehn. Nun stellst du die Toolbar ein.
- TBXSwitcher aufs Form ziehn.
- Im Code die "TB2Common" einbinden.
- Im OnCreate verwende ich diesen Code:
Delphi-Quellcode:
procedure TfrmMain.FormCreate(Sender: TObject);
var
C: HCURSOR;
begin
TBXSwitcher1.EnableXPStyles := IsWindowsXP;
TBXSetTheme('Office2003');
//Replace Borland's hand cursor with default one
C := LoadCursor(0, IDC_HAND);
if C <> 0 then Screen.Cursors[crHandPoint] := C;
end;
Ich habe zusaetzlich noch den Office2003-Stil, der das Programm so aussehn laesst:
Hier eine Variante auswaehlen
Mit TBXSetTheme kannst du das Theme einstellen. Beachte dass das gesetzte Theme
nur fuer die TBX-Kompos gilt, also auch nicht fuer die TB2k-Kompos, und schon gar nicht fuer Buttons etc. Um die Buttons auch im XP-Stil zu bekommen, musst du ein XPManifest aufs Form ziehn.
Sieh dir aber auch die Demo-App an, welche mit TBX geliefert wurde, dort siehst du welche Themes standardmaessig dabei sind.
Greetz
alcaeus