FileForums
Page 89 of 105 « First 39798788 89 909199 Last »
Show 40 post(s) from this thread on one page

FileForums (https://fileforums.com/index.php)
-   Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)
-   -   INNO TROUBLESHOOT - Questions Here (https://fileforums.com/showthread.php?t=93193)

Gupta 23-08-2017 05:17
yener had used A dummy label to use as shadows.
jst top and left property be +1 else everything is same

Code:
procedure UpdateShadow(var Current, Shadow :TLabel);
begin
  if Shadow = nil then
    Shadow := TLabel.Create(WizardForm);
  if Current.Visible and (ShadowTXT >= 0) then begin
    with Shadow do begin
      Caption := Current.Caption;
      Alignment := Current.Alignment;
      AutoSize := Current.Autosize;
      Transparent := Current.Transparent;
      WordWrap := Current.Wordwrap;
      Parent := Current.Parent;
      OnClick := Current.OnClick;
      OnDblClick := Current.OnDblClick;
      OnMouseDown := Current.OnMouseDown;
      OnMouseMove := Current.OnMouseMove;
      OnMouseUp := Current.OnMouseUp;
      Font.Color := ShadowTXT; 
      Font.Size := Current.Font.Size;
      Font.Name := Current.Font.Name;
      Font.Style := Current.Font.Style;
      Visible := Current.Visible;
      Height := Current.Height;
      Width := Current.Width;
      Left := Current.Left + 1;
      Top := Current.Top + 1;
      SendToBack;
    end;
  end else
    Shadow.Hide;
end;
or
https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx

KaktoR 24-08-2017 07:17
Code:
procedure CurPageChanged(CurPageID: integer);
  begin
  case CurPageID of
    wpInstalling: begin
      WizardForm.ClientHeight := (180);
      WizardForm.ClientWidth := (497);
      WizardForm.CancelButton.SetBounds(ScaleX(75), ScaleY(23), ScaleX(412), ScaleY(327));
...
...
I'm not able to move Cancel button on installing page. Anyone knows why?

Also, BackButton just disappears with this

Code:
wpSelectDir: begin
      WizardForm.NextButton.Caption := 'Install';
      WizardForm.BackButton.SetBounds(ScaleX(75), ScaleY(23), ScaleX(242), ScaleY(227));
I have to define these buttons seperatly? I just thought because there are already in "InnoSetup Support" tab.

Gupta 24-08-2017 08:09
if u r using Native controls(Notebooks), then you can't put anything on them unless control is a child

KaktoR 24-08-2017 10:22
Thank you for your help.

Do it a different way then.

KaktoR 25-08-2017 06:16
How i can hide
Code:
wpInfoBefore: begin
      WizardForm.NoStartMenu.Hide; WizardForm.Icons.Hide;
    end;
Unknown identifier :confused:

Code:
var
  Icons: TNewCheckBox;
  NoStartMenu: TNewCheckBox;
Code:
NoStartMenu := TNewCheckBox.Create(WizardForm);
  with NoStartMenu do begin
    Parent := WizardForm.InnerPage;
    Left := ScaleX(46);
    Top := ScaleY(224);
    Width := ScaleX(411);
    Height := ScaleY(17);
    Caption := 'Don''t create Start Menu folder';
    OnClick := @NoStartMenuClick;
    Checked := False;
  end;

  Icons := TNewCheckBox.Create(WizardForm);
  with Icons do begin
    Parent := WizardForm.InnerPage;
    Left := ScaleX(46);
    Top := ScaleY(248);
    Width := ScaleX(411);
    Height := ScaleY(17);
    Caption := 'Create {#Name} Desktop Icon';
    Checked := False;
  end;

Gupta 25-08-2017 06:35
NoStartMenu, Icons aren't real members of WizardForm, you added them later on
try
NoStartMenu.Hide; Icons.Hide;

KaktoR 25-08-2017 06:50
That makes totally sense. THank you, it works :D

Sometimes i make mistakes like those things.

KaktoR 25-08-2017 12:09
Is there a way to resize SelectDirPage? Because i can't deactivate it.

Code:
with WizardForm.SelectDirPage do begin
    Left := ScaleX(1);
    Top := ScaleY(1);
    Width := ScaleX(500);
    Height := ScaleY(364);
  end;
Code:
wpSelectDir: begin
      WizardForm.SelectDirPage.SetBounds(ScaleX(0), ScaleY(0), ScaleX(500), ScaleY(364));
Both doesn't work.

I'm not in the mood to create a whole new page instead.

KaktoR 17-09-2017 11:12
Any way to set CheckBox style to default?

CheckBoxes from [Run] and Style (cjstyle/vsf) are different in appearance. I don't like that.

KaktoR 27-01-2018 08:37
Using GetIniInt to get required space (mb) digits. But at this point i don't know exactly how to replace it with the SizeMB define properly.

Code:
NeedSpaceLabel.Caption := ExpandConstant('{cm:NeedSpace}  ') + MbOrTb({#SizeMB});
I've tried with {code:RequiredSpace} and it's associated procedure, but get an error when it comes to the page where disk space is called.

Going to change my code to get rid of defines and using GetIniStr and GetIniInt instead. GetIniStr is fine, not a problem.

I hope someony could point me in right direction.

78372 27-01-2018 09:15
Maybe I am not understanding the question. Reading from ini and placing in the wizard form doesn't work or what?

KaktoR 27-01-2018 09:38
Yes, exactly, but only for the one mentioned code tag above.

78372 27-01-2018 11:28
Show code please (you used ISPP code, right?)

MARCUS HOLLOWAY 27-01-2018 11:53
Hey KaktoR,
#define SizeMB ReadIni(SourcePath + "\setup.ini", "Application", "Appsize", "")

in setup.ini
[Application]
Appsize=4096

KaktoR 27-01-2018 12:45
Quote:
Originally Posted by MARCUS HOLLOWAY (Post 466261)
Hey KaktoR,
#define SizeMB ReadIni(SourcePath + "\setup.ini", "Application", "Appsize", "")

in setup.ini
[Application]
Appsize=4096
Ok, didn't know it's possible to read from ini through define. Good to know. :p

I guess this answeres my question.

Thanks both of you ;)


All times are GMT -7. The time now is 05:39.
Page 89 of 105 « First 39798788 89 909199 Last »
Show 40 post(s) from this thread on one page

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions Inc.
FileForums @ https://fileforums.com