sjwrec
Full Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
////////////////////// SelectComponentDirPage //////////////////////
SelectComponentsLabel := TLabel.Create(WizardForm);
with SelectComponentsLabel do begin
Left:= ScaleX(310)
Top:= ScaleY(160);
Width:= ScaleX(450)
Height:= ScaleY(152)
Font.Name:= 'Georgia';
Font.Size:= 8;
Font.Color:=clWhite;
Font.Style:=[fsBold, fsItalic];
Parent := WizardForm;
Transparent:=True;
end;
ComponentsList := TLabel.Create(WizardForm);
with ComponentsList do begin
Left:= ScaleX(310)
Top:= ScaleY(220);
Width:= ScaleX(450)
Height:= ScaleY(152)
Font.Name:= 'Georgia';
Font.Size:= 8;
Font.Color:=clWhite;
Font.Style:=[fsBold, fsItalic];
Parent := WizardForm;
Transparent:=True;
end;
ComponentsDiskSpaceLabel := TLabel.Create(WizardForm);
with ComponentsDiskSpaceLabel do begin
Left:= ScaleX(310)
Top:= ScaleY(290);
Width:= ScaleX(450)
Height:= ScaleY(152)
Font.Name:= 'Georgia';
Font.Size:= 8;
Font.Color:=clWhite;
Font.Style:=[fsBold, fsItalic];
Parent := WizardForm;
Transparent:=True;
end;
////////////////////// SelectComponentDirPage //////////////////////
|
