Sergey_Demchuk
Silver Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
InfoPanel := TPanel.Create(WizardForm);
InfoPanel.Parent := WizardForm.SelectComponentsPage;
InfoPanel.Caption := '';
// InfoPanel.Transparent:=True;
InfoPanel.Top := WizardForm.ComponentsList.Top;
InfoPanel.Left := WizardForm.ComponentsList.Width + WizardForm.ComponentsList.Left;
InfoPanel.Width := WizardForm.ComponentsList.Width - ScaleX(25);
InfoPanel.Height := WizardForm.ComponentsList.Height;
InfoPanel.BevelInner := bvRaised;
InfoPanel.BevelOuter := bvLowered;
InfoPanel.Color:=clBlack
InfoCaption := TNewStaticText.Create(WizardForm);
InfoCaption.Parent := WizardForm.SelectComponentsPage;
InfoCaption.Caption := 'Èíôîðìàöèÿ:';
InfoCaption.Left := InfoPanel.Left + ScaleX(24);
InfoCaption.Top := InfoPanel.Top;
InfoCaption.Font.Color := clBlack;
Info := TNewStaticText.Create(WizardForm);
Info.Parent := InfoPanel;
Info.AutoSize := False;
Info.Left := ScaleX(2);
Info.Width := InfoPanel.Width - ScaleX(2);
Info.Top := ScaleY(10);
Info.Height := WizardForm.ComponentsList.Height - ScaleY(2);
Info.WordWrap := true;
Info.Caption := ExpandConstant('{cm:ComponentsInfoPanel2}');
Info.Font.Color:=clSilver;
Image:=TBitmapImage.Create(WizardForm);
with Image do begin
AutoSize:=True;
Enabled:=True;
// ExtractTemporaryFile('Image.bmp');
Bitmap.LoadFromFile(ExpandConstant('{tmp}')+'\1.bmp');
Parent:=Info;
end
// ExtractTemporaryFile('1.bmp');
// BGImgFile := ExpandConstant('{tmp}\1.bmp');
// with InfoPanel do
// begin
// Left := (WizardForm.ClientWidth-WizardForm.ComponentsList.Width) div 2;
// Top := ScaleY(180);
// Font.Color := clSilver;
// BorderWidth := (WizardForm.ComponentsList.Width-WizardForm.ComponentsList.ClientWidth) div 2;
// LoadBGBmpFromFile(BGImgFile, InfoPanel.Left, InfoPanel.Top);
// Parent := InfoPanel;
// end;
enabledesc(WizardForm.ComponentsList.Handle,Info.Handle,
ExpandConstant('{cm:ComponentsDescription1};')+
ExpandConstant('{cm:ComponentsDescription2};')+
ExpandConstant('{cm:ComponentsDescription3};')+
ExpandConstant('{cm:ComponentsDescription4};')+
ExpandConstant('{cm:ComponentsDescription5};')+
ExpandConstant('{cm:ComponentsDescription6};')+
ExpandConstant('{cm:ComponentsDescription7};')+
ExpandConstant('{cm:ComponentsDescription8};')+
ExpandConstant('{cm:ComponentsDescription9};')+
ExpandConstant('{cm:ComponentsDescription10};')+
ExpandConstant('{cm:ComponentsDescription11};')+
ExpandConstant('{cm:ComponentsDescription12};')+
ExpandConstant('{cm:ComponentsDescription13};')+
ExpandConstant('{cm:ComponentsDescription14};')+
ExpandConstant('{cm:ComponentsDescription15};')+
ExpandConstant('{cm:ComponentsDescription16};')+
ExpandConstant('{cm:ComponentsDescription17};')+
ExpandConstant('{cm:ComponentsDescription18};')+
ExpandConstant('{cm:ComponentsDescription19};')+
ExpandConstant('{cm:ComponentsDescription20};')+
ExpandConstant('{cm:ComponentsDescription21};')
);
|
