GreatManuals.com
Huge Collections of Software Manuals and Knowledgebase

Add Skin Support for Project

Add main components

1. Add TspDynamicSkinForm and TspSkinData components in form.
2. Add TspSkinCompressedStoredSkin or TbsCompressedSkinList components if you want use store skins in *.exe file.
3. Set TspDynamicSkinForm.SkinData property.
4. Set TspSkinSkinData.CompressedStoredSkin or TspSkinSkinData.StoredSkin properties.
5. Load skins to TbsCompressedStoredSkin or TbsCompressedSkinList component.
6. Set TspDynamicSkinForm.BorderIcons.
7. Set TspDynamicSkinForm.ShowIcon property.
8. If you use TspCompressedSkinList component then set SkinData.SkinInxdex property.

Add custom button in form caption (TspDynamicSkinForm.SupportNCArea = TRUE)

1. Open skin with SkinBuilder and add your 'stdbutton' or 'animate' object("command" property set to "cmdefault").
2. Use TspDynamicSkinForm.OnActivateCustomObject event to activate your object:

Example:

procedure TForm1.spDynamicSkinForm1ActivateCustomObject(IDName: String;
var ObjectVisible: Boolean);
begin
if IDName = 'custombutton' then ObjectVisible := True;
end;

3. Use TDynamicSkinForm.OnMouseUpEvent[OnMouseDownEvent] property:

procedure TForm1.spDynamicSkinForm1MouseUpEvent(IDName: String; X,
Y: Integer; ObjectRect: TRect; Button: TMouseButton);
begin
if IDName = 'custombutton' then ....

end;

Add skin menus

1. Add TspSkinMainMenu component, set items and set TForm.Menu = nil.
2. Add TspSkinMainMenuBar component.
3. Set TspSkinMainMenuBar.DynamicSkinForm property.
4. Set TspDynamicSkinForm.MainMenuBar property.
5. Set TspSkinMainMenuBar.MainMenu property.
6. Add TspSkinPopupMenu components.
7. Set SkinData property of components.
8. [ Set TspDynamicSkinForm.MenusSkinData property. (if menus must have another skindata) ]

Add MDITabsBar

1. Add TspSkinMDITabsBar component.
2. Set TspSkinBusinessSkin.MDITabsBar property.

Add skin hints

1. Add TspSkinHint component.
2. Set TspSkinHint.SkinData.
3. Set Active = True.
4. Show skin-objects hints (hints of buttons in form caption):

   set TspSkinDynamicSkinForm.SkinHint property;

   set TspSkinDynamicSkinForm.ShowObjectHints = True.

Add TrayIcon support

1. Add TspSkinTrayIcon
2. Set TspDynamicSkinForm.TrayIcon property.
3. Add biMinimizeToTray value to TspDynamicSkinForm.BorderIcons.

Add Controls

1. Add controls to form.
2. Set SkinDataName property. This property can include list of values.
3. Set SkinData property.
4. Set UseSkinFont property. (Set this property to false if you want use your font (DefaultFont property) in control).
5. Set UseSkinSize property (In some controls you must set this property to false to get control with anysize).
6. [Set DefaultWidth and DefaultHeight properties if you use default mode without skin].

Add statusbar

1. Add TspSkinStatusBar control
2. Call context menu and choose "panel" or "gauge" controls.
3. Add other controls.

»