Что нового

GUI форма (full screen)

serzzz

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

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

CreatoR

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

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


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

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

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









и ещё

{MultplQuestionWarn.Admin}
 

joiner

Модератор
Локальный модератор
Сообщения
3 362
Репутация
586
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 319
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
 
Верх