Как сделать чтобы при создании формы происходило 2 события?

[artbotva]

Помогите пожайлуста, мне надо чтобы при создании формы (FormCreate)
Происходило 2 события.
1.Форма открывалась во весь экран
2.Воспроизводился звук
Но у меня постоянно вылезают ошибки компилятора
Вот код полного экрана

procedure TForm1.FormCreate(Sender: TObject);
var
  HTaskbar: HWND;
  OldVal: LongInt;
begin

  try
    // Find handle of TASKBAR
    HTaskBar := FindWindow('Shell_TrayWnd', nil);
    // Turn SYSTEM KEYS off, Only Win 95/98/ME
    SystemParametersInfo(97, Word(True), @OldVal, 0);
    // Disable the taskbar
    EnableWindow(HTaskBar, False);
    // Hide the taskbar
    ShowWindow(HTaskbar, SW_HIDE);
  finally
    with Form1 do
    begin
      BorderStyle := bsNone;
      FormStyle   := fsStayOnTop;
      Left        := 0;
      Top         := 0;
      Height      := Screen.Height;
      Width       := Screen.Width;
    end;
    end
    end;

Подскажите куда надо впихнуть код воспроизведения

begin
  mediaplayer1.Play;
  end;

[Stilet]

постоянно вылезают ошибки

Ошибки в студию.

[artbotva]

Ошибок очень много. (Походу из-за нарушенной последовательности)
Надо - бы полный связный код (полный экран+звук)

[chertovich]

событие OnShow.
А почему бы не установить необходимые параметры в инспекторе объектов?

[artbotva]

Сообщение от chertovich

событие OnShow.
А почему бы не установить необходимые параметры в инспекторе объектов?

Можно поподробней

[artemavd]

Чтобы форму на весь экран: ставишь у нее свойство WindowState = wsMaximized.
Чтобы воспроизвести звук: ставишь свой mediaplayer1.Play; в событие OnCreate формы

[artbotva]

Избавился от одной появилась другая теперь
при компиляции ошибок не возникает, но когда пытаешься запустить пишет
Project Project.exe raised exception и т.п
Как можно исправить?

[artemavd]

Удали exe файл своей программы и откомпиль все модули снова, чтобы получился новый exe