Progress: CIU Designer

[Carldric Clement]

Previous here https://fileforums.com/showpost.php?...&postcount=167

This is might take longer to finish. I lost the project before cause my laptop was stolen. Don't worry it would post updates here as well as I can. Coming soon.

[Cesar82]

@Carldric Clement, very good!
This will be very helpful!
If you need any information about Setup.ini keys or images in CIU send me PM.
Soon I'll share a new source code with some new features like 3 slider for volume control for songs/videos, so if you need the source code in advance to be able to work on it, just ask me.
Thank you!

[Carldric Clement]

Moving Image with following Left & Top

[lolaya]

nice work

[Gupta]

nice

[Carldric Clement]

1st Issue: Music Button was not the same as the Autorun installer. I will try to figure it out later.

[Cesar82]

@Carldric Clement, in CIU the "MusicIcon" button when positioned over the "MusicButton" button (RectInRect) is set to disabled, so the actions of the "MusicButton" button change the state of "MusicIcon", but it behaves only visually (no Click or OnMouse actions ).
The same goes for MusicIconAR (together with MusicARButton) and also for MusicIconSI (together with SmallMusicButton).

- "MusicIconAR", "MusicIcon" and "MusicIconSI" is a normal Botva2 pot with 4 images (idle, selected, clicked, disabled) arranged vertically in an image (in the CIU theme example, only the disabled icon was created because it does not use the other images).
- "MusicButtonAR", "MusicButton" and "SmallMusicButton" is a CstmButtom by Yener90 with 4 images separately.

P.S: You can see the code at the end of the ButtonsTextures procedure in the CIU script.

  BtnGetPosition(hMusicAR, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(MusicARBtn, CstmBtnInt) then
    BtnSetEnabled(hMusicAR, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));

  BtnGetPosition(hMusic, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(MusicBtn, CstmBtnInt) then
    BtnSetEnabled(hMusic, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));

  BtnGetPosition(hMusicSI, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(MusicSmallBtn, CstmBtnInt) then
    BtnSetEnabled(hMusicSI, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));

  BtnGetPosition(hPauseSI, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(PauseSmallBtn, CstmBtnInt) then
    BtnSetEnabled(hPauseSI, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));
end;

I don't want to be intrusive in your work, I just want to try to help you understand some things that are not so visible in CIU's behavior.

[Carldric Clement]

Originally Posted by Cesar82

@Carldric Clement, in CIU the "MusicIcon" button when positioned over the "MusicButton" button (RectInRect) is set to disabled, so the actions of the "MusicButton" button change the state of "MusicIcon", but it behaves only visually (no Click or OnMouse actions ).
The same goes for MusicIconAR (together with MusicARButton) and also for MusicIconSI (together with SmallMusicButton).

- "MusicIconAR", "MusicIcon" and "MusicIconSI" is a normal Botva2 pot with 4 images (idle, selected, clicked, disabled) arranged vertically in an image (in the CIU theme example, only the disabled icon was created because it does not use the other images).
- "MusicButtonAR", "MusicButton" and "SmallMusicButton" is a CstmButtom by Yener90 with 4 images separately.

P.S: You can see the code at the end of the ButtonsTextures procedure in the CIU script.

  BtnGetPosition(hMusicAR, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(MusicARBtn, CstmBtnInt) then
    BtnSetEnabled(hMusicAR, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));

  BtnGetPosition(hMusic, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(MusicBtn, CstmBtnInt) then
    BtnSetEnabled(hMusic, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));

  BtnGetPosition(hMusicSI, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(MusicSmallBtn, CstmBtnInt) then
    BtnSetEnabled(hMusicSI, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));

  BtnGetPosition(hPauseSI, Rt.Left, Rt.Top, Rt.Bottom, Rt.Right);
  Rt.Bottom := Rt.Top + Rt.Bottom;
  Rt.Right:= Rt.Left + Rt.Right;
  if BtnY(PauseSmallBtn, CstmBtnInt) then
    BtnSetEnabled(hPauseSI, not RectInRect(Rt, BoundsToRect(CstmBtn[CstmBtnInt].AreaX, CstmBtn[CstmBtnInt].AreaY, CstmBtn[CstmBtnInt].AreaW, CstmBtn[CstmBtnInt].AreaH)));
end;

I didn't expect that code before. they just joined with some other point-like
(Bottom = Top + Bottom) and (Right = Left + Right).

I'm gonna try to do with these code on Designer.

[Cesar82]

I think I put it inverted (Rt.Bottom and Rt.Right) in BtnGetPosition. lol
I just realized this now, I'll fix it here.
BtnGetPosition(hMusicAR, Rt.Left, Rt.Top, Rt.Right, Rt.Bottom);
BtnGetPosition(hMusicSI, Rt.Left, Rt.Top, Rt.Right, Rt.Bottom);
BtnGetPosition(hPauseSI, Rt.Left, Rt.Top, Rt.Right, Rt.Bottom);
As the CIU CloseButton had the same Width and Height dimensions it worked, but it was wrong.

[Carldric Clement]

In case you guys need this app, well you got more bugs. Feel free to use it until it's finished this project.

Progress: 11%.

[Carldric Clement]

Originally Posted by Cesar82

I think I put it inverted (Rt.Bottom and Rt.Right) in BtnGetPosition. lol
I just realized this now, I'll fix it here.
BtnGetPosition(hMusicAR, Rt.Left, Rt.Top, Rt.Right, Rt.Bottom);
BtnGetPosition(hMusicSI, Rt.Left, Rt.Top, Rt.Right, Rt.Bottom);
BtnGetPosition(hPauseSI, Rt.Left, Rt.Top, Rt.Right, Rt.Bottom);
As the CIU CloseButton had the same Width and Height dimensions it worked, but it was wrong.

It's ok as long as you need to correction code.