|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Как вставить картинку в интерфейс программы? |
|
Как вставить картинку в интерфейс программы?
|
Пользователь Сообщения: 58 |
Здравствуйте. Не получается вставить картинку в созданный GUI.
#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Opt('MustDeclareVars', 1) Global $gui, $guiPos, $pic, $picPos Example1() Func Example1() Local $n, $msg GUICreate("My GUI picture", 350, 300, -1, -1, $WS_SIZEBOX + $WS_SYSMENU) ; will create a dialog box that when displayed is centered GUISetBkColor(0xE0FFFF) $n = GUICtrlCreatePic("C:\Users\Administrator\Desktop\sms.png", 50, 50, 200, 50) GUISetState() ; Run the GUI until the dialog is closed While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop WEnd ; resize the control $n = GUICtrlSetPos($n, 50, 50, 200, 100) ; Run the GUI until the dialog is closed While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop WEnd GUIDelete() EndFunc , когда хотел вставить свою картинку - кнопку. Выручайти ![]() |
|
Отправлено: 11:15, 31-03-2010 |
$AutoITer Сообщения: 446
|
Профиль | Отправить PM | Цитировать AutoIt не показывает png файлы без специальной библиотеки. Тем более если файл имеет прозрачность.
|
------- Отправлено: 11:31, 31-03-2010 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Пользователь Сообщения: 58
|
Профиль | Отправить PM | Цитировать пробовал .jpg - не работает. Как можно вставить закруглённую картинку для кнопки без прозрачности?
|
Отправлено: 11:43, 31-03-2010 | #3 |
$AutoITer Сообщения: 446
|
Профиль | Отправить PM | Цитировать Для кнопки помоему можно установить только иконку...
|
------- Отправлено: 12:00, 31-03-2010 | #4 |
Пользователь Сообщения: 58
|
Профиль | Отправить PM | Цитировать хорошо, для кнопки справка предлагает :
#include <GUIConstantsEx.au3> #include <ButtonConstants.au3> Opt('MustDeclareVars', 1) Example() Func Example() Local $msg GUICreate("My GUI") ; will create a dialog box that when displayed is centered GUICtrlCreateButton("my picture button", 10, 20, 40, 40, $BS_ICON) GUICtrlSetImage(-1, "shell32.dll", 22) GUISetState() ; Run the GUI until the dialog is closed While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop WEnd EndFunc ;==>Example ![]() А ещё, было - бы не плохо сменить картинку "AutoIt" В вехнем левом углу интерфейса(рядом с названием окна) |
|
Последний раз редактировалось Не флужу, 31-03-2010 в 12:23. Отправлено: 12:12, 31-03-2010 | #5 |
Пользователь Сообщения: 58
|
Профиль | Отправить PM | Цитировать С кнопкой решено. Просто нужно использовать картинку с .ico расширением
|
Отправлено: 17:29, 31-03-2010 | #6 |
$AutoITer Сообщения: 446
|
Профиль | Отправить PM | Цитировать Цитата Не флужу:
|
|
------- Отправлено: 20:34, 31-03-2010 | #7 |
![]() Старожил Сообщения: 206
|
Профиль | Отправить PM | Цитировать #include <GUIConstantsEx.au3> #include <GuiButton.au3> #include <GuiImageList.au3> Opt("MustDeclareVars", 1) _Main() Func _Main() Local $sBMPNormal = @WindowsDir & "\pchealth\helpctr\System\images\24x24\arrow_green_normal.bmp" Local $sBMPHot = @WindowsDir & "\pchealth\helpctr\System\images\24x24\arrow_green_mouseover.bmp" Local $sBMPPress = @WindowsDir & "\pchealth\helpctr\System\images\24x24\arrow_green_mousedown.bmp" Local $sBMPImage = @WindowsDir & "\pchealth\helpctr\System\blurbs\watermark_300x.bmp" Local $btn1, $btn2, $btn3, $btn4, $msg Local $hImagebtn1, $hImagebtn2, $hImagebtn3 ,$hImagebtn4 ;Caveat: Minimum Operating Systems: Windows XP. ;Image list with multiple images will only show the images ;other than the 1st image when Themes are used. Local $hGUI = GUICreate("Button Imagelists - Minimum OS: Windows XP",400,300) GUICtrlCreatePic(@WindowsDir & "\Web\Wallpaper\Windows XP.jpg", 0, 0, 400, 300) GUICtrlSetState(-1, $GUI_DISABLE) ;multi state image Bitmap $btn1 = GUICtrlCreateButton("This Way", 30, 30, 90, 32) GUICtrlSetTip(-1, "Multi state bitmap imagelist") $hImagebtn1 = _GUIImageList_Create(24, 24, 5, 5) _GUIImageList_AddBitmap($hImagebtn1, $sBMPNormal);1 - Normal _GUIImageList_AddBitmap($hImagebtn1, $sBMPHot) ;2 - Hot _GUIImageList_AddBitmap($hImagebtn1, $sBMPPress) ;3 - Pressed _GUIImageList_AddBitmap($hImagebtn1, $sBMPPress) ;4 - Disabled _GUIImageList_AddBitmap($hImagebtn1, $sBMPNormal);5 - Defaulted _GUIImageList_AddBitmap($hImagebtn1, $sBMPNormal);6 - Stylus Hot (tablet computers only) _GUICtrlButton_SetImageList($btn1, $hImagebtn1) ;single state image Bitmap $btn2 = GUICtrlCreateButton("This Way", 30, 70, 90, 32) GUICtrlSetTip(-1, "Single bitmap imagelist") $hImagebtn2 = _GUIImageList_Create(24, 24, 5, 3) _GUIImageList_AddBitmap($hImagebtn2, $sBMPNormal);1 - Normal _GUICtrlButton_SetImageList($btn2, $hImagebtn2) ;single state image Icon $btn3 = GUICtrlCreateButton("Unlock", 30, 110, 90, 40) GUICtrlSetTip(-1, "Single icon imagelist") $hImagebtn3 = _GUIImageList_Create(32, 32, 5, 3) _GUIImageList_AddIcon($hImagebtn3, "shell32.dll", 47, True) _GUICtrlButton_SetImageList($btn3, $hImagebtn3) ;single state image Bitmap with overlayed text $btn4 = GUICtrlCreateButton("Help", 30, 160, 90, 90) GUICtrlSetTip(-1, "Single bitmap imagelist with overlayed text") GUICtrlSetFont(-1, 14, 800, -1, "Comic Sans MS") $hImagebtn4 = _GUIImageList_Create(80, 80, 5, 3) _GUIImageList_AddBitmap($hImagebtn4, $sBMPImage) _GUICtrlButton_SetImageList($btn4, $hImagebtn4, 4) GUISetState() While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE Exit Case $btn1 Case $btn2 GUICtrlSetState($btn1, $GUI_DISABLE) Case $btn3 GUICtrlSetState($btn1, $GUI_ENABLE) Case $btn4 EndSwitch WEnd EndFunc ;==>_Main |
Отправлено: 20:44, 31-03-2010 | #8 |
![]() Новый участник Сообщения: 29
|
Профиль | Отправить PM | Цитировать эм... по моему можно просто сделать например так...
если в GUI окно то: GUICtrlCreatePic ( @ScriptDir & '\картинка.BMP', 0, 0 ,400 ,400 ) ;если будет bmp то проблем должно быть а если на кнопку то не обязательно .ico можно и bmp: или я не прав? или что-то не так понял? |
Последний раз редактировалось JaguarSP, 21-04-2010 в 17:09. Причина: =) Отправлено: 17:05, 21-04-2010 | #9 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Интерфейс программы + Excel | Frost_Imp | AutoIt | 7 | 08-08-2022 00:04 | |
Delphi - вставить картинку | kostiks | Программирование и базы данных | 2 | 19-10-2009 00:15 | |
Можно ли вставить картинку с превью в сообщение электронной почты? | silalex | Вебмастеру | 14 | 30-05-2009 23:12 | |
[решено] Как вставить/убрать картинку в видео | illusionmgs | Хочу все знать | 7 | 08-10-2008 15:01 | |
Оформление - Setup Billboards как вставить свою картинку | 3Gi | Автоматическая установка Windows 2000/XP/2003 | 1 | 18-07-2008 20:52 |
|