Что нового

GUI форма (full screen)

serzzz

Новичок
Сообщения
18
Репутация
0
Здрасте,

Такой вопрос. Можно сделать форму:
1. размер которой был бы всегда full screen
2. чтобы не было стандартных кнопок Minimize, RestoreDown, Close. Как во всех Win окнах.
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,659
Репутация
2,457
Re: GUI full screen

Предупреждение За нарушение правил форума (пункт Б.5):
Имя темы должно нести смысловую нагрузку (отражать суть вопроса/проблемы)
Правильно сформулированное название темы привлекает больше внимания, и шансы получить конкретный ответ увеличиваются.


Как правильно называть темы

"GUI full screen" - это неприемлемое название темы, переименуйте тему иначе она будет закрыта, а вам возможно будет выдан бан на несколько дней.

С уважением, Администратор форума.









и ещё

{MultplQuestionWarn.Admin}
 

joiner

Модератор
Локальный модератор
Сообщения
3,393
Репутация
594
Re: GUI full screen

наверное так
делал такую шутку.
 
Автор
S

serzzz

Новичок
Сообщения
18
Репутация
0
Re: GUI форма (full screen) и кнопки с картинками

Спасибо Александр.

Делается окно с картинкой на весь экран. это мне пригодится, програмку сделаем покрасивее :smile:
Мешает только:
- Окно можно двигать, это плохо.
- Полоску с наванием окна тоже можно отключить?

А вооще можно в кнопку вставить картинку?
 

aleratorio

Осваивающий
Сообщения
85
Репутация
42
serzzz сказал(а):
- Окно можно двигать, это плохо.
- Полоску с наванием окна тоже можно отключить?

Сделай вот так:
Код:
#NoTrayIcon
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUICreate("Вот такие пироги.", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP)
;GUICtrlCreatePic(@WindowsDir & "\ex.gif",0, 0,@DesktopWidth, @DesktopHeight)
GUISetState()


While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd


serzzz сказал(а):
А вооще можно в кнопку вставить картинку?

Код:
$Button = GUICtrlCreateButton("Button", 185, 147, 75, 66, $BS_BITMAP)
GUICtrlSetImage(-1, "C:\Scripts\test\image.bmp", -1)
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,320
serzzz
Немного переделанный пример к функции _WinAPI_GetWorkArea() из Расширение стандартной AutoIt библиотеки WinAPI.au3.
Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <WinAPIEx.au3>
#include <GuiButton.au3>
#include <GuiImageList.au3>

Opt('MustDeclareVars', 1)
Opt('GUICloseOnESC', 0)

Global $hForm, $tRECT, $X, $Y, $Width, $Height, $time = True, _
		$hImage, $nButton, $nMsg, $nPic

HotKeySet('^{F12}', '_Exit') ;Ctrl+F12 выход

$hImage = _GUIImageList_Create(16, 16, 5, 1)
_GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 110)
_GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 131)
_GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 165)
_GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 168)
_GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 137)
_GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 146)

$tRECT = _WinAPI_GetWorkArea()
$Width = DllStructGetData($tRECT, 'Right') - DllStructGetData($tRECT, 'Left')
$Height = DllStructGetData($tRECT, 'Bottom') - DllStructGetData($tRECT, 'Top')
$X = DllStructGetData($tRECT, 'Left')
$Y = DllStructGetData($tRECT, 'Top')
$hForm = GUICreate('MyGUI', $Width, $Height, $X, $Y, $WS_POPUP, $WS_EX_TOPMOST)
$nPic = GUICtrlCreatePic(@WindowsDir & '\Web\Wallpaper\Wallpaper 10.jpg', 0, 0, $Width, $Height)
GUICtrlSetState(-1, $GUI_DISABLE)
;GUISetBkColor(0x87CEFA, $hForm)
$nButton = GUICtrlCreateButton('Click', $Width / 2 - 40, $Height / 2 - 16, 80, 32)
GUICtrlSetFont(-1, 12, 600)
_GUICtrlButton_SetImageList(-1, $hImage)
WinSetTrans($hForm, '', 220)
GUISetState()

_WinAPI_EmptyWorkingSet()

While $time
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $nButton
			If MsgBox(262180, 'Test', 'Выходим?') = 6 Then
				_Exit()
			EndIf
	EndSwitch
WEnd

Func _Exit()
	$time = False
EndFunc   ;==>_Exit
 

dronet

Знающий
Сообщения
46
Репутация
8
Вот так не двигаетса, может поможет... :whistle:
Код:
$GUI_EVENT_CLOSE = -3
$WS_POPUP = 0x80000000
$WS_EX_LAYERED = 0x00080000


$Form1 = GUICreate("Form1", 452, 449, -1, -1, $WS_POPUP)
GUISetState(@SW_SHOW)

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $Form1
		Case $Form1
		Case $Form1
		Case $Form1
	EndSwitch
WEnd



Добавлено:
Сообщение автоматически объединено:

Смотри в справке про стили, или в онлайн справке - тут: http://www.autoitscript.com/autoit3/docs/appendix/GUIStyles.htm :smile:
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
622
serzzz
Предупреждение добавление слова "форма" не сильно способствовало обретению названия осмысленного содержания.
 

dronet

Знающий
Сообщения
46
Репутация
8
Может не подвижное окно, во весь экран? Как пример... :whistle:
 

Sniper

Новичок
Сообщения
23
Репутация
1
Это делается так:
Код:
#include <windowsconstants.au3>
#include <guiconstants.au3>
$gui = GUICreate("TEST", 100, 100, -1, -1, $WS_POPUP + $WS_MAXIMIZE)
GUISetState()
While 1
	Switch GUIGetMsg()
		Case $gui_event_close
			Exit
	EndSwitch
WEnd
 
Верх