Вывести Timage на весь экран - Общие вопросы Delphi

igabenu · 29.01.2011, 19:51

Сам разобрался

Код:

Form1.Height:=1600;
Form1.width:=900;
Image1.Height:=1600;
Image1.width:=900;

Form1.BorderStyle:=bsNone;
Form1.WindowState := wsMaximized;

filvika · 29.01.2011, 20:49

Так короче

Код:

Form1.WindowState := wsMaximized;
Form1.BorderStyle := bsNone;
image1.Align := alClient;

29.01.2011, 19:51	#1
igabenu Пользователь Регистрация: 05.11.2010 Сообщений: 27	Вывести Timage на весь экран Сам разобрался Код: `Form1.Height:=1600; Form1.width:=900; Image1.Height:=1600; Image1.width:=900; Form1.BorderStyle:=bsNone; Form1.WindowState := wsMaximized;` Последний раз редактировалось igabenu; 29.01.2011 в 20:02.

29.01.2011, 20:49	#2
filvika Пользователь Регистрация: 25.08.2010 Сообщений: 25	Так короче Код: `Form1.WindowState := wsMaximized; Form1.BorderStyle := bsNone; image1.Align := alClient;`

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск