首页/文章/ 详情

Workbench平台GUI二次开发入门系列——对话框1

1天前浏览11


案例使用方法

本入门教程中的所有案例均已测试通过,具体参考入门1中的使用方法。

目录

01 入门1

02 入门2 

03 布局管理1 

04 布局管理2 

05 菜单栏1 

06 菜单栏2 

07 工具栏 

08 基本控件1 

09 基本控件2 

10 基本控件3 

11 基本控件4

12 高级控件1

13 高级控件2

14 对话框1 

15 对话框2 

16 拖拽功能 

17 绘图1 

18 绘图2 

19 绘图3 

20 绘图4 

21 进度条 

22 游戏——贪吃蛇

对话框1
case26 FolderBrowserDialog(文件夹对话框)

功能:打开文件夹对话框

本案例中创建按钮,其功能用于触发事件,弹出选择文件夹窗口。 对应的本文框会显示路径地址。

# encoding: utf-8
import clr
clr.AddReference("System.Windows.Forms")
clr.AddReference("System.Drawing")

import System.Windows.Forms
from System.Windows.Forms import * 

class IForm(System.Windows.Forms.Form):
    def __init__(self):
        self._textBox1 = System.Windows.Forms.TextBox()
        self._button1 = System.Windows.Forms.Button()
        self._textBox1.Location = System.Drawing.Point(2050)
        self._textBox1.Size = System.Drawing.Size(12020)
        self._button1.Location = System.Drawing.Point(15050)
        self._button1.Size = System.Drawing.Size(5020)
        self._button1.Text = "button"
        self._button1.Click += self.OnClicked
        self.Controls.Add(self._button1)
        self.Controls.Add(self._textBox1)
        self.Text = "FolderBrowserDialog"
        self.CenterToScreen()        
    def OnClicked(self, sender, e):
        dialog = FolderBrowserDialog()
        if (dialog.ShowDialog(self) == DialogResult.OK):
            self._textBox1.Text = dialog.SelectedPath

System.Windows.Forms.Application.Run(IForm())

效果展示:



case27 ColorDialog(颜色选择对话框)

功能:打开颜色选择夹对话框

本案例中创建按钮,其功能用于触发事件,弹出颜色选择窗口。 对应的色块会改变颜色。

# encoding: utf-8
import sys
import clr
clr.AddReference("System.Windows.Forms")
clr.AddReference("System.Drawing")

from System.Windows.Forms import *
from System.Drawing import Point, Size, Color, SolidBrush, Rectangle

RECT_WIDTH  = 200
RECT_HEIGHT = 100

class IForm(Form):
    def __init__(self):
        self.Text = "ColorDialog"
        self.color = Color.Blue
        self._button1 = Button()
        self._button1.Location = Point(15050)
        self._button1.Size = Size(5020)
        self._button1.Text = "button"
        self.Controls.Add(self._button1)
        self._button1.Click += self.OnClicked
        self.SetStyle(ControlStyles.ResizeRedraw, True)
        self.Paint += self.OnPaint
        self.CenterToScreen()
    def OnPaint(self, event):
        g = event.Graphics
        self.LocateRect()
        brush = SolidBrush(self.color)
        g.FillRectangle(brush, self.r)
    def OnClicked(self, sender, events):
        dialog = ColorDialog()
        if (dialog.ShowDialog(self) == DialogResult.OK):
            self.color = dialog.Color
            self.Invalidate()
    def LocateRect(self):
        x = (self.ClientSize.Width - RECT_WIDTH) / 2
        y = (self.ClientSize.Height - RECT_HEIGHT) / 2
        self.r = Rectangle(x, y, RECT_WIDTH, RECT_HEIGHT)

IForm().ShowDialog()

效果展示:


完整的本地电子版本参阅入门1的其他。


来源:CAE中学生
WorkbenchSystem二次开发电子游戏
著作权归作者所有,欢迎分享,未经许可,不得转载
首次发布时间:2025-03-09
最近编辑:1天前
CAE无剑
硕士 | 仿真工程师 CAE中学生
获赞 711粉丝 1571文章 271课程 0
点赞
收藏
作者推荐

Workbench平台GUI二次开发入门系列——基本控件4

案例使用方法本入门教程中的所有案例均已测试通过,具体参考入门1中的使用方法。目录01 入门102 入门2 03 布局管理1 04 布局管理2 05 菜单栏1 06 菜单栏2 07 工具栏 08 基本控件1 09 基本控件2 10 基本控件3 11 基本控件4 12 高级控件1 13 高级控件2 14 对话框1 15 对话框2 16 拖拽功能 17 绘图1 18 绘图2 19 绘图3 20 绘图4 21 进度条 22 游戏——贪吃蛇基本控件4case20 工具栏控件7 TextBox 目标:创建TextBox,并显示在Label标签上。本案例中分别创建了TextBox和Label两个控件,在TextBox中可以输入字符,相应的字符会显示在Label中。# encoding: utf-8import clrclr.AddReference("System.Windows.Forms")clr.AddReference("System.Drawing")from System.Windows.Forms import Application, Formfrom System.Windows.Forms import Label, TextBoxfrom System.Drawing import Size, Pointclass IForm(Form): def __init__(self): self.Text = 'TextBox' self.text = Label() self.text.Parent = self self.text.Text = "..." self.text.AutoSize = True self.text.Location = Point(60, 40) tbox = TextBox() tbox.Parent = self tbox.Location = Point(60, 100) tbox.KeyUp += self.OnKeyUp self.Size = Size(250, 200) self.CenterToScreen() def OnKeyUp(self, sender, event): self.text.Text = sender.TextApplication.Run(IForm()) 效果展示:case21 工具栏控件8 PictureBox目标:创建一个图片框,并在其中显示图片。# encoding: utf-8import sysimport clrclr.AddReference("System.Windows.Forms")clr.AddReference("System.Drawing")from System.Windows.Forms import Application, Form, PictureBoxfrom System.Drawing import Size, Point, Bitmappath = r"D:\01-图片\12345.png"class IForm(Form): def __init__(self): self.Text = 'PictureBox' try: castle = Bitmap(path) except Exception, e: print 'Cannot read image file' print e.message sys.exit(1) pb = PictureBox() pb.Parent = self pb.Size = Size(castle.Width, castle.Height) pb.Location = Point(2, 2) pb.Image = castle self.Size = Size(castle.Width, castle.Height) self.CenterToScreen()Application.Run(IForm()) 效果展示:完整的本地电子版本参阅入门1的其他。来源:CAE中学生

未登录
还没有评论
课程
培训
服务
行家
VIP会员 学习计划 福利任务
下载APP
联系我们
帮助与反馈