[CheshireCat]

maybe it works with the method AddFolder …

Code:

procedure TForm1.sShellTreeView1AddFolder(Sender: TObject;
AFolder: TacShellFolder; var CanAdd: Boolean);
var
Ext: string;
const
Mask = '.exe';
begin
Ext := ExtractFileExt(AFolder.DisplayName(seSystem));
CanAdd := AFolder.IsFolder or (CompareText(Mask, Ext) = 0);
end;

[CheshireCat]

Hello,

try this:

Code:

procedure TForm1.sButton1Click(Sender: TObject);
begin
sShellListView1.Mask := '*.exe;*.ini';
end;

I hope you mean ShellListView instead ShellTreeView 🙂

[CheshireCat]

Quote:

Hello Friend you will Releasing the Next Version of Skins AlphaSkins?

The Skin is free to use for all.

[attachment=6278:FM.zip]

Have fun … 🙄

[CheshireCat]

Hello Serge,

I have added a little demo for this two issues.

[attachment=6273:PageCtrl.png]

[attachment=6274:PageCtrlDemo.zip]

[CheshireCat]

Hello,

the best way is to replace all TTrackBar with TsTrackBar. Click with the right mouse button on the form and select “View as text” (see code snippet).

Code:

object TrackBar1: TTrackBar <-- change TTrackBar to TsTrackbar
Left = 88
Top = -4
Width = 150
Height = 45
TabOrder = 1
end

Then switch back to form view.

[CheshireCat]

'Hamilton' wrote:

Version 8.30 of AC introduces an issue with the TsPageControl having a ttMenu tab item where the Subway skin causes a white line above the menu text (see attached). Some combination of changing skins and other actions can cause the white line to be drawn black which leads me to think it is a boundary issue rather than something that has been intentionally changed in the skin.

Hello,

I can not reproduce your issues, who is the owner of the PageControl? The form or another component? When I set the PageControl on a panel with the section CHECKBOX I have the following result as you can see on the picture. The client area will colorized to fuchsia by creating tabs at runtime or the problem also arises when switching between tabs.

[attachment=6271:TabClientArea.png]

[CheshireCat]

Hello Marvie,

I seem to remember the PNGImage unit must be installed separately for delphi < 2009. You can download the file here.

Maybe it will help you further…

[CheshireCat]

Hello,

maybe he wants to have these controls as alpha controls. It might be of interest for an alternative TrackBar style and small Scrollbars.

[CheshireCat]

Hello,

This is a default behavior, no error in alpha controls. You can test it with a new project and standard Panel and Speedbutton.

[CheshireCat]

Hello,

for this component you must to set the colors manually. I have added a small demo, the demo is not complete, but it shows the way how to implement it. You can customize the colors for your needs.

[CheshireCat]

Hello,

many thanks for the demo, the skin is completed but still without a name.

[CheshireCat]

Hello Eric,

I can recommend the TAdvStringGrid from TMS Software. This grid is flexible and very good supported by AlphaControls.

I am available for you, if you have questions about skinning of the grid.

[CheshireCat]

I hope it comes very similar to the original, as can be seen on the photos.

Unfortunately, I do not have a name for this skin, has perhaps someone a good idea? 🙄

Screenshots:

[attachment=6235:KSDEV_01.png][attachment=6236:KSDEV_02.png]

[CheshireCat]

Hello,

ok, I will see what can be done 🙂

[CheshireCat]

Hello Wolfgang,

try BDiMode := bdLeftToRight and/or ParentBDiMode := True.

[CheshireCat]

Hello,

before you install the old package you must delete all acnt*.bpl and acnt*.dcp.

Or check this site:

Uninstalling previous version of the package

Maybe it helps 🙂

[CheshireCat]

'Advalorem' wrote:

So, i uninstalled v8.18 and reinstalled v8.10 but problem still remains. Does anybody can help me?

Hello,

do you have delete all DCU files and recompile your application?

[CheshireCat]

Hello,

I think Google Picasa looks similar to Snow Leopard or MacOS 2 skin. Maybe you have other sources and examples or screenshots?

And by the way, before I forget it: I am glad of course always about tips and suggestions for new skins. We can use this topic to post suggestions and opinions 🙂

[CheshireCat]

Hello Wolfgang,

You can try provisional:

Code:

sEdit1.OnChange := nil; // Edit that performs SQL
Skinmanger1.RepaintForms(True);
sEdit1.OnChange := sEdit1Change;

I think Serge will find a solution soon :a3:

[CheshireCat]

Hello aphects,

you can try to compile the package or your project without debug-information!

[Author]

Posts