在Python脚本中使用Delphi控件

简介:

   Python设计GUI界面的时候,有强大的WxPython,PyQt等,在Windows下也有一个PyWin32的,不过那个是纯SDK模式开发的,用起来不太方便,这两天通过P4D研究了一下Delphi和Python交互的模式,于是通过P4D写了一个模块,通过本模块,就能实现在Python脚本中使用Delphi的控件。目前转化了几个基本的控件支持,增加了几个常规函数,用来作为一般的需求。

比如使用本模块创建一个简单脚本的记事本功能:

复制代码
# -*-coding: gbk-*-
from  DxVcl  import   *

class  MainForm(Form):
def   __init__ (self, Owner):
self.Caption 
=   " A Delphi Form... "  
self.SetBounds(
10 10 500 400 )
self.TopPanel 
=  Panel(self)
self.TopPanel.Parent 
=  self
self.TopPanel.Align 
=   1
self.Btn 
=  Button(self)
self.Btn.SetProps(Parent
= self.TopPanel, Caption = " 打开 " )
self.Btn.SetBounds(0, 
3 100 25
self.OnClose 
=  self.MainFormClose
self.Btn.OnClick 
=  self.BtnClick
self.BtnSave 
=  Button(self)
self.BtnSave.SetProps(Parent
= self.TopPanel, Caption = " 保存 " )
self.BtnSave.SetBounds(
110 3 100 25
self.BtnSave.OnClick 
=  self.BtnSaveClick

self.Mo 
=  Memo(self)
self.Mo.Parent 
=  self
self.Mo.Align 
=   5  
def  BtnClick(self,Sender):
# self.Caption = "测试不得闲"
# ShowMessage(StrToHex(self.Caption))
# ShowMessage(''.join(['16进制转换回来:',HexToStr(StrToHex(self.Caption))]))
# ShowMessage(IntToStr(234234)) 
fileName  =  OpenDialog( ' 文本文件|*.txt ' , ' 打开文档 ' )
if  fileName:
self.Caption = '已经打开'+fileName.encode('gbk')
self.Mo.Lines.LoadFromFile(fileName.encode(
' gbk ' ))
def  BtnSaveClick(self,Sender):
if  Ask(self.Handle, ' 确定要保存 ' ):
fileName 
=  SaveDialog( ' 文本文件|*.txt ' , ' 保存文档 ' )
if  fileName:
self.Mo.Lines.SaveToFile(fileName.encode(
' gbk ' ))

def  MainFormClose(self, Sender, Action):
Action.Value 
=  caFree

class  DxLogForm(Form):
def   __init__ (self,Owner):
self.Caption 
=   ' 不得闲测试窗体 '
self.Position 
=   5
self.BorderStyle 
=   3
self.Width 
=   234
self.Height 
=   150
self.lb1 
=  Label(self)
self.lb1.SetProps(Parent 
=  self,Caption  =   ' 用户 ' )
self.lb1.SetBounds(
40 , 16 , 28 , 13 )
self.EdtUser 
=  Edit(self)
self.EdtUser.SetProps(Parent 
=  self,Text  =   ' dxsoft ' )
self.EdtUser.SetBounds(
77 , 13 , 121 , 21 )
self.lb2 
=  Label(self)
self.lb2.SetProps(Parent 
=  self,Caption  =   ' 密码 ' )
self.lb2.SetBounds(
40 , 48 , 28 , 13 )
self.EdtPwd 
=  Edit(self)
self.EdtPwd.SetProps(Parent 
=  self,Text  =   ' dxsoft ' ,PasswordChar = ' * ' )
self.EdtPwd.SetBounds(
77 , 45 , 121 , 21 )

self.BtnLog 
=  Button(self)
self.BtnLog.SetProps(Parent 
=  self,Caption  =   ' 登录 ' )
self.BtnLog.SetBounds(
25 , 80 , 75 , 25 )
self.BtnLog.OnClick 
=  self.BtnClick
self.BtnCancel 
=  Button(self)
self.BtnCancel.SetProps(Parent 
=  self,Caption  =   ' 取消 ' )
self.BtnCancel.SetBounds(
141 , 80 , 75 , 25 )
self.BtnCancel.OnClick 
=  self.BtnCancelClick
def  BtnClick(self,Sender):
if  self.EdtPwd.Text.decode( ' gbk ' ==   ' 123 ' :
ShowMessage(
' 登录成功,打开主窗体 '
# self.visible = false 
# 打开另一个窗体
self.ModalResult  =  mrok
else
ShowMessage(
' 密码为123 ' )
def  BtnCancelClick(self,Sender):
self.Close()

def  dolog():
LogFrm 
=  DxLogForm(None)
=  LogFrm.ShowModal()  ==  mrok
LogFrm.Free() 
return  m

def  main():
FreeConsole()
if  dolog():
Application.Initialize()
Application.Title 
=   ' TestApp '
=  MainForm(Application)
f.Show() 
Application.Run()
else :
ShowMessage(
' 用户取消了登录 ' )

if   __name__ == ' __main__ ' :
main()
复制代码

程序运行这个脚本双击运行之后的效果就是

2011040316520780.png


本文转自 不得闲 博客园博客,原文链接:http://www.cnblogs.com/DxSoft/archive/2011/04/03/2004490.html   ,如需转载请自行联系原作者


相关文章
|
17天前
|
Linux Shell Python
Linux执行Python脚本
Linux执行Python脚本
23 1
|
2月前
|
Web App开发 数据采集 自然语言处理
python脚本抢各大平台大额优惠卷
python脚本抢各大平台大额优惠卷
47 0
|
6天前
|
JSON 测试技术 持续交付
自动化测试与脚本编写:Python实践指南
【4月更文挑战第9天】本文探讨了Python在自动化测试中的应用,强调其作为热门选择的原因。Python拥有丰富的测试框架(如unittest、pytest、nose)以支持自动化测试,简化测试用例的编写与维护。示例展示了使用unittest进行单元测试的基本步骤。此外,Python还适用于集成测试、系统测试等,提供模拟外部系统行为的工具。在脚本编写实践中,Python的灵活语法和强大库(如os、shutil、sqlite3、json)助力执行复杂测试任务。同时,Python支持并发、分布式执行及与Jenkins、Travis CI等持续集成工具的集成,提升测试效率和质量。
|
13天前
|
存储 监控 异构计算
【Python】GPU内存监控脚本
【Python】GPU内存监控脚本
|
13天前
|
Ubuntu Unix Linux
【Linux/Ubuntu】Linux/Ubuntu运行python脚本
【Linux/Ubuntu】Linux/Ubuntu运行python脚本
|
21天前
|
XML Shell Linux
性能工具之 JMeter 使用 Python 脚本快速执行
性能工具之 JMeter 使用 Python 脚本快速执行
37 1
性能工具之 JMeter 使用 Python 脚本快速执行
|
1月前
|
数据采集 测试技术 Python
Python自动化脚本的魅力与实践
Python自动化脚本的魅力与实践
47 0
|
1月前
|
数据安全/隐私保护 Python
使用Python脚本实现图片合成PDF功能
使用Python脚本实现图片合成PDF功能
26 0
|
1月前
|
安全 数据安全/隐私保护 开发者
如何使用Pyarmor保护你的Python脚本
如何使用Pyarmor保护你的Python脚本
38 0
|
1月前
|
数据处理 Python
Python自动化脚本
Python自动化脚本
20 0