TOPIC:

WizzardManager WizzardButtonsPanel 8 years 9 months ago #7516

Alexandr Topic Author Offline Junior Member Posts: 62 Thank you received: 2	Greetings! A very good controls to realize cool pagination like in setup, but I found two bugs: 1. Help button declared in designer properties but dont't exists visually. 2. Previous and Next buttons don't have their glyphs. Can you fix that in next dev build?
	Please Log in or Create an account to join the conversation.

WizzardManager WizzardButtonsPanel 8 years 9 months ago #7517

Alexandr
Topic Author
Offline
Junior Member
Posts: 62
Thank you received: 2

I've fixed that as I can.
See attachment, used source code from latest dev build.

But two moments:
1.

procedure TWizardButtonPanel.DoOnResize;
begin
  inherited DoOnResize;
  FHelpButton.Left := 10;  //Some resizing staff what need do with it?
  FFinishButton.Left := FCancelButton.Left - FFinishButton.Width - 8;
  FNextButton.Left := FFinishButton.Left - FNextButton.Width - 8;
  FPreviousButton.Left := FNextButton.Left - FPreviousButton.Width - 2;
end;

I think there need do some resize actions.

I never make controls for lazarus. Can you tell me how I can debug controls in run-time without rebuilding the IDE with mod. package?

Second:
Still donk know from where glypths are taken and why Previus, Help and next butons don't have them. In LUIPackage I didn't found resources for buttons.

...rdcontrols.zip

Please Log in or Create an account to join the conversation.

Last edit: by Alexandr.

WizzardManager WizzardButtonsPanel 8 years 9 months ago #7519

Sternas Stefanos
Offline
Moderator
Ex Pilot, M.Sc, Ph.D
Posts: 4508
Thank you received: 1100

Thanks Sir
we add your mod to Lab CT

1) you must Rebuild IDE from IDE->Tools->Build Typhon With Profile :
the first time get some time, but after that the rebuild take some seconds
Try to remove some pks from IDE, to minimize the rebuild time

2) For glyths :

TWizardPanelBitBtn is class(TCustomBitBtn)

TCustomBitBtn has default property Kind: TBitBtnKind
This property if is NOT bkCustom gives to button and a glyth from LCL res file

in wizardcontrols.pas Line 604
constructor TWizardButtonPanel.Create(TheOwner: TComponent);

gives to TWizardPanelBitBtn the TCustomBitBtn.Kind property value

PilotLogic Architect and Core Programmer

The following user(s) said Thank You: Alexandr

Please Log in or Create an account to join the conversation.

Last edit: by Sternas Stefanos.

WizzardManager WizzardButtonsPanel 8 years 9 months ago #7521

Alexandr Topic Author Offline Junior Member Posts: 62 Thank you received: 2	Thanks! I change code according with your comments. glypths now correctly sets. For next, prev buttons kind set to bkCustom by default, also glypth must be set by programmer. Attachments: ...controls-2.zip
	Please Log in or Create an account to join the conversation.

WizzardManager WizzardButtonsPanel 8 years 9 months ago #7524

Sternas Stefanos Offline Moderator Ex Pilot, M.Sc, Ph.D Posts: 4508 Thank you received: 1100	We put your mods to Lab CT, Sir PilotLogic Architect and Core Programmer
	Please Log in or Create an account to join the conversation.