property Align: TAlign; // published, inherited from TControl
Поскольку TPdfView происходит от TScrollingWinControl, он участвует в стандартной системе компоновки VCL/LCL. Align сообщает родителю, как пристыковать средство просмотра к одной или нескольким граням, что является наиболее распространённым способом заставить программу чтения PDF заполнить всю форму, панель внутри разделителя или область вкладки
Наиболее полезное значение для средства просмотра PDF — alClient, которое заставляет средство просмотра поглотить каждый оставшийся пиксель своего родителя после того, как панели инструментов, строки состояния и боковые панели размещены. В сочетании с FitMode оформление страницы автоматически масштабируется при изменении пользователем размера формы, поэтому документ всегда использует максимально возможную область
Когда Align вступает в силу, унаследованная логика изменения размера пересчитывает клиентскую область, а внутренний диапазон прокрутки средства просмотра перестраивается под новый размер, поэтому вертикальные полосы прокрутки и текущая позиция страницы остаются корректными. Событие OnResize возникает после применения выравнивания
TAlign (alNone, alTop, alBottom, alLeft, alRight, alClient, alCustom)alLeft или alBottom и позвольте PdfView1.Align := alClient заполнить остаток — это сохраняет семантику z-order для всех типов контейнеров VCLAnchors для точного поведения, оставьте Align равным alNone; эти две системы взаимоисключающие на одном элементе управления
// Build a viewer that fills the form except for a toolbar on top
procedure TForm1.FormCreate(Sender: TObject);
begin
ToolBar1.Align := alTop;
StatusBar1.Align := alBottom;
PdfView1.Parent := Self;
PdfView1.Align := alClient;
PdfView1.FitMode := pfmFitToWidth;
PdfView1.Pdf := Pdf1;
Pdf1.LoadFromFile('sample.pdf');
PdfView1.Active := True;
end;