[gispos]

Hello,

I've tested version 7.46 with my application and the popup menu no longer flickers.

I don't know why, but on the test application it isn’t perfect and on my current application it is absolutely perfect. 😀

Please do not change anymore. :a4:

Thanks a lot.

gispos

Support: You can delete my Attachments to save Space.

[gispos]

'Support' wrote:

Try the AlphaControls v7.46

Nice.

The flickering of Edit Controls is again gone. 🙂

Popup Menu flickering on skin “Cold” is almost gone. It’s not perfect but the flickering is now rare.

Comical, on skin “tv-b” I notice no improvement for the Popup Menu, but no matter.

Thanks

gispos

[gispos]

Hello, yes Aero is enabled.

I've created a screen capture video file (divx) with 200 FPS.

First you see Version 7.43, this Version does not flicker. (7.42, 7.44 to)

Next Version 7.45 does flicker is the Native Border enabled.

Tested on 3 Computers with Windows 7.

I cannot capture the Popup menu flickering, while my PC captures the screen the Popup menu pops up very slow and does not flicker.

[gispos]

It was not meant any harm, but it is better to concentrate on the essentials in the beginning.

Here is a simple example do show a Form with fade in effect. With the fade function of alpha controls I have in older versions problems with flicker is AlphaBlendValue smaller then 255.

Code:

procedure AlternativeFadeIn(aForm: TForm; max: Integer);
var
i: Integer;
begin
sSkinManager1.AnimEffects.FormShow.Time := 0;
If max > 255 then
max := 255;

aForm.AlphaBlendValue := 1;
aForm.AlphaBlend := true;
aForm.Visible := true;
SetWindowPos(aForm.Handle, HWND_TOP,0,0,0,0, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
UpdateWindow(aForm.Handle);
//RedrawWindow(aForm.Handle, nil, 0, RDW_INVALIDATE or RDW_ALLCHILDREN or RDW_FRAME or RDW_ERASE or RDW_UPDATENOW);

aForm.Update; // AlphaControls needs this

for i := 1 to 50 do
if max > aForm.AlphaBlendValue – 5 then
begin
aForm.AlphaBlendValue := round(i*5.1);
sleep(4);
end
else break;

aForm.AlphaBlendValue := max;
//RedrawWindow(aForm.Handle, nil, 0, RDW_INVALIDATE or RDW_ALLCHILDREN or RDW_FRAME or RDW_ERASE or RDW_UPDATENOW);
end;

Best regards

gispos

[gispos]

I’m not sure what you mean.

In Demo Version 7.45 enable the Native Border for a Skin.

Check Edit Controls.

And now deactivate and activate the Form.

When the form gets focus, the edit controls flickers.

This problem was corrected in the previous versions.

I use Windows 7, and Windows 7 prepares many problems. Unfortunately, Windows 7 is the future. 🙁

PS: Sorry, you must enable the Native Border. I'm confused with the Extended Border in older Versions.

Best regards

gispos

[gispos]

Hi,

there is not a AlphaControls technics but a AlphaBlend technic under Delphi.

MyForm.AlphaBlend := True;

MyForm.AlphaBlendValue := 180;

My Opinion: You should first learn Delphi before do use AlphaControls. <_<

regards

gispos

[gispos]

What does this have to do with AlphaControls :cs:

[gispos]

Hello,

in Demo Version 7.44 does this effect with skin tv-b exist, but very slight. Have a popup menu more entries the flicker effect is bigger.

It’s flicker not on all clicks, but at every second or third clicks.

The sample is a Delphi 2010 Project

PS: I’m testing Demo Version 7.45… oooh man, the solved problem with flickering on Edit controls by activate the application is now again available. 🙁

http://www.alphaskins.com/forum/index.php?showtopic=6139

Best regards

gispos

[Author]

Posts