[Rosenkrantz]

В файле tester_.pas заменить процедуру TForm1.FormCreate на вот это:

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
    Image1.AutoSize := False;
    Image1.Proportional := True;
    RadioButton1.Visible := False;

{=== Добавленные строки ===}
    BorderStyle := bsSizeable;
    BorderIcons := [biSystemMenu, biMinimize, biMaximize];

    Constraints.MinHeight := Height;
    Constraints.MinWidth  := Width;
    Panel1.Align := alBottom;
    Button1.Parent := Panel1;
    Button1.Top    := (Panel1.Height - Button1.Height) div 2;
    Button1.Left   := 20;
end;

Все это можно сделать и во время конструирования формы в IDE, но так нагляднее.