Cherche des skins pour delphi

Version imprimable

17/04/2009, 09h28
halimweb

Cherche des skins pour delphi

Bonjour,

J'espère que vous allez bien,

Je cherche des skins gratuites pour skinner mon programme.

Merci d'avance.
17/04/2009, 09h59
chaplin

En allant sur ce site, en fuinant un peu tu trouveras des choses interessantes.
17/04/2009, 16h00
perrysoft

Citation:

Envoyé par halimweb

Bonjour,

J'espère que vous allez bien,

Je cherche des skins gratuites pour skinner mon programme.

Merci d'avance.

Bonjour

regarde sur le site www.delphiskins.com il y a une version gratuite des composants alphacontrolss.

Cordialement
Sébastien

Citation:

Envoyé par perrysoft

Bonjour

regarde sur le site www.delphiskins.com il y a une version gratuite des composants alphacontrolss.

Cordialement
Sébastien

Merci, les Skins sont magnifique,

Mais comment j'utilise les skins?

sur mon fichier DFM je trouve ce code:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
  object SkinData1: TSkinData
    Active = True
    DisableTag = 99
    SkinControls = [xcMainMenu, xcPopupMenu, xcToolbar, xcControlbar, xcCombo, xcCheckBox, xcRadioButton, xcProgress, xcScrollbar, xcEdit, xcButton, xcBitBtn, xcSpeedButton, xcPanel, xcGroupBox, xcStatusBar, xcTab, xcSystemMenu]
    Skin3rd.Strings = (
      'TTBDock=Panel'
      'TTBToolbar=Panel'
      'TImageEnMView=scrollbar'
      ......etc
    SkinStore = '(Good)'
    SkinFormtype = sfMainform
    Version = '2.68.9.07'
    MenuUpdate = True
    Left = 184
    Top = 11
    SkinStream ={  41537A66030000000B0000004F7074696 ...etc

et sur les skins de Alphacontrols je trouve le code suivent:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 object sSkinManager1: TsSkinManager
    InternalSkins = <
      item
        Name = 'WMP 2008 (internal)'
        GeneralData = <>
        Images = <>
        Patterns = <>
        Shadow1Color = clBlack
        Shadow1Offset = 0
        Shadow1Transparency = 0
        Data = {
          41537A66080000000B0000004...etc

comment je remplace mon skin par celui de Alphacontrols?

Merci pour votre aide.

17/04/2009, 19h49
NABIL74

salut ,

Citation:

Mais comment j'utilise les skins?

pour utiliser les skins de "alpha controls":
1-sur ta fiche joute le composant "sSkinManager".
2-dans sa propriété "skinDirectory" clique sur les "..." et donne le chemin dans lequel se trouve ton skin.
3-mets la propriété "active" à "true"
c'est tout.

bonne chance

A+

NABIL74
20/04/2009, 11h28
halimweb

Citation:

Envoyé par NABIL74

salut ,

pour utiliser les skins de "alpha controls":
1-sur ta fiche joute le composant "sSkinManager".
2-dans sa propriété "skinDirectory" clique sur les "..." et donne le chemin dans lequel se trouve ton skin.
3-mets la propriété "active" à "true"
c'est tout.

bonne chance

A+

NABIL74

Je suis faible avec Delphi,
Mon programme contient déjà un Skin, et je veux le remplacer par le Skin de Alphacontrols
Mais le probleme c'est que mon skin commence par " SkinStream ="
Et le Skin de Alphacontrols commence par "Data ="
Quand je remplace le code de mon Skin par le code de Alphacontrols l'application ne marche pas.
( je remplace le code qui contient des chiffres et des lettres comme: 41537A66030000000B0000004F7074696...)

Merci pour votre aide.