找回密码
 加入
搜索
查看: 1806|回复: 5

[AU3基础] 自定义form窗体大小,然后窗体不够时,图标自动到下一行去。

  [复制链接]
发表于 2012-9-4 10:12:10 | 显示全部楼层 |阅读模式
自定义form窗体大小,然后窗体不够大时,图标自动到下一行去。还有怎么在配置文件config.ini,增加图标ICO控件,并且整齐排列.

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2012-9-4 11:49:20 | 显示全部楼层
整齐排列..貌似没这功能吧` 至少我是自己算的!!
 楼主| 发表于 2012-9-4 12:03:58 | 显示全部楼层
回复 2# 小凯
给个代码呗
发表于 2012-9-4 13:50:03 | 显示全部楼层
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$x = "5"
$y = "8"
$s = "97"
Global $gui
Local $pic[$s+1]
$Form1 = GUICreate("form", 629, 269, 193, 113)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_du()
While 1

        $nMsg = GUIGetMsg()
For $i = 1 To $s
        Switch $nMsg

        Case  $Pic[$i]
        MsgBox(0,"提示","按钮:"&GUICtrlRead($Pic[$i]))
                Case $GUI_EVENT_CLOSE
                        Exit
        EndSwitch
                                Next
WEnd

 Func _du()
For $i = 1 To 97
$Pic[$i] = GUICtrlCreateButton($i, $x, $y, 26, 26, $BS_BITMAP)
$x = $x+33
If $x = 632 Then 
$x = "5"
$y =$y+33
EndIf
        Next
EndFunc
不知道符不符合你的要求!!
 楼主| 发表于 2012-9-4 17:01:00 | 显示全部楼层
回复 4# 小凯
为什么把30行的代码换成GUICtrlCreateIcon("D:\icon1.ico", -1, $x, $y, 49, 49, BitOR($SS_NOTIFY,$WS_GROUP))
 楼主| 发表于 2012-9-5 09:19:08 | 显示全部楼层
那怎么办.....
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-26 20:10 , Processed in 0.082708 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表