type TForm1 = class(TForm) Image1: TImage; Button1: TButton; OpenDialog1: TOpenDialog; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); begin if OpenDialog1.Execute then begin Image1.Picture.LoadFromFile(OpenDialog1.FileName); Image1.Stretch:=true; Image1.Left:=form1.Width div 2-image1.Width div 2; Image1.top:=form1.Height div 2-image1.Height div 2; end end;
У всех возможностей форматирования в Word есть ограничения. Так, гарнитура, размер и все остальные атрибуты применяются только к шрифту. Затем следует форматирование абзаца - определенные команды, служащие для выравнивания по центру или по ширине, создания отступа и т. д. Далее идет форматирование страницы, которое включает установку полей страницы, колонтитулов и другие параметры.
Что же стоит над форматированием страницы? Есть ли следующая ступень? Конечно! Это создание разделов, с которых можно менять параметры форматирования страниц документа. Так, если в данном месте документа должна быть страница с выравниванием по центру или страница с альбомной ориентацией, без нового раздела не обойтись. Раздел - это самый большой фрагмент документа, который можно форматировать.
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
Image1: TImage;
Button1: TButton;
OpenDialog1: TOpenDialog;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
Image1.Picture.LoadFromFile(OpenDialog1.FileName);
Image1.Stretch:=true;
Image1.Left:=form1.Width div 2-image1.Width div 2;
Image1.top:=form1.Height div 2-image1.Height div 2;
end
end;
end.
Объяснение:
Зачем нужны разделы?
У всех возможностей форматирования в Word есть ограничения. Так, гарнитура, размер и все остальные атрибуты применяются только к шрифту. Затем следует форматирование абзаца - определенные команды, служащие для выравнивания по центру или по ширине, создания отступа и т. д. Далее идет форматирование страницы, которое включает установку полей страницы, колонтитулов и другие параметры.
Что же стоит над форматированием страницы? Есть ли следующая ступень? Конечно! Это создание разделов, с которых можно менять параметры форматирования страниц документа. Так, если в данном месте документа должна быть страница с выравниванием по центру или страница с альбомной ориентацией, без нового раздела не обойтись. Раздел - это самый большой фрагмент документа, который можно форматировать.