как привязать окно под размер файла - видео проигрыватель AVI

[_Solomon_]

я сделал видео проигрыватель AVI, вот только окно не подстраивается под размер воспроизводимого файла, помогите как привязать окно под размер файла....

[Speeker]

а что если Autosize выставить True

[_Solomon_]

AutoSize True на панель где отображается видео делал, что то криво прёт....

[mishel]

А, вообще хороший вопрос. Я вот вообще хотел свою программу сделать в полноэкранном режиме, но панель "пуск" мешает. КТО-НИБУДЬ ЗНАЕТ, КАК ЕЕ УБРАТЬ?

[AVer]

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

А, вообще хороший вопрос. Я вот вообще хотел свою программу сделать в полноэкранном режиме, но панель "пуск" мешает. КТО-НИБУДЬ ЗНАЕТ, КАК ЕЕ УБРАТЬ?

Задавай программе размеры экрана:

Form1.Height:=Screen.Height;
Form1.Width:=Screen.Width;

Отрубаешь заголовок:

Form1.BorderStyle:=bsNone

И тащишь в верхний левый угол:

Form1.Left:=0;
Form1.Top:=0;

[mishel]

Спасибо огромное

[Speeker]

А если так:

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.windowState:= wsMaximized;
form1.FormStyle :=fsstayOnTop;
form1.BorderStyle:=bsNone;
end;