Delphi 程序最大化全部窗体也放大

2024-11-03

Delphi 自定义窗体（最大化、最小化、关闭、窗体的移动）

Uses ShellAPI; 1.//最小化procedure TForm1.btn1Click(Sender: TObject);var I, J, X, Y: Word;begin //第一种:最小化在屏幕的左下角 ,不是常见的最小化 // WindowState := wsMinimized; //第儿种:最小化在任务栏里面 ,是常见的最小化 postmessage(Self.Handle,WM_SYSCOMMAND,SC_MINIMIZE,0);end; 2.//最大化/正常

Delphi程序调用C#.Net编译的DLL并打开窗体(详解)

Delphi程序调用C#.Net编译的DLL并打开窗体(详解)最近用C#.Net写了一个公用模块, 本以为仅提供给.Net程序使用, 但是领导要求把这些功能提供给旧系统使用, 天啦, 几套旧系统全是Delphi写的, 我不想再重复写一次,于是尝试编译成COM组件提供给Delphi调用．花了一下午研究技术, 结果很满意, 调试通过, 特分享受出来给大家学习. 实现步骤: 1.生成密钥文件用于给程序集强名称签名(必须)sn -k MyKey.snk 2.使用强名称签名的Key编译成类库Tester.

javascript小记三则：ASP.NET启动web调试，窗体自动放大的方法

源码如下,简单一句JS,轻松解决窗体不会自动放大的浏览器: <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" > <head runat=&

一名Delphi程序员的开发习惯

一名Delphi程序员的开发习惯有关开发习惯的一些想法,如鲠在喉,不吐不快.究其发贴动机,当然不排除有骗取参与分的可能,但另一方面,也希望能给同行(念Xing)者提供一些建议,或者参考(希望不是误人子弟).同时,也希望各位能够就我的这些陋习,发表一点看法,给出批评和指正的意见.谢谢. 一．建立工程目录首先,第一步要做的,当然是给新项目建一个单独的目录(别笑).目录名称与项目名称同名,或者另取一个也可,只要清楚.简练.然后,在此目录中创建以下各个目录: <Doc>:用来存放该项目相关的开

Fastreport使用经验(转)在Delphi程序中访问报表对象

Fastreport使用经验(转) 在Delphi程序中访问报表对象最基本的方法就是frxReport1.FindObject. 然后把返回的对象强制转换成它的类型,当然,在报表中必须真的有这么个东东.如改变一个 Tfrxmemoview的内容,可以这样写TfrxMemoView(frxReport1.FindObject('memo1')).Text:='jade'; 还可以用TfrxReportPage的FindBand方法,这个方法的参数是Band类,如报表抬头就可以直接使用这个方法,因

Delphi中动态创建窗体有四种方式

Delphi中动态创建窗体有四种方式,最好的方式如下: 比如在第一个窗体中调用每二个,主为第一个,第二个设为动态创建 Uses Unit2; //引用单元文件 procedure TForm1.Button1Click(Sender: TObject);beginform2:=TForm2.Create(Application); //创建窗体form2.Show; //显示窗体end;end. ==================================================

Delphi程序的自我修改

前言: 对于Delphi在编译时对代码所做的工作,大部分使用Object Pascal之类的高级语言的程序员并不是很熟悉.如果你对汇编程序以及EXE文件格式有一点基本认识,那么源代码里包含的注释将把一切解释得非常清楚.另外,我还要说明一下源代码在编译时被做了什么处理. 我对汇编程序以及EXE文件格式的认识也是及其有限的,大部分是我在寻找反盗版和程序的自我修改等信息时自学的.为什么我要写这篇文章?因为我发现这方面的信息非常少,因此我把收集到的信息整理到一起,并希望能和大家一起分享.

C# winform解决解决窗体第一次设置为最大化后，点击最大化按钮窗体无法居中问题

public frmMain() { InitializeComponent(); //解决窗体第一次设置为最大化后,点击最大化按钮窗体无法居中问题 int x = Convert.ToInt32((Screen.PrimaryScreen.WorkingArea.Width - this.Width) * 0.5); int y = Convert.ToInt32((Screen.PrimaryScreen.WorkingArea.Height - this.Height) * 0.5); t

delphi 程序全屏显示无标题栏，覆盖整个屏幕

delphi 程序全屏显示无标题栏,覆盖整个屏幕,这个在做工控机或屏保时有用的,所以记下 procedure TMainFrm.FormCreate(Sender: TObject); begin with MainFrm do begin { Position form } Top := 0 ; Left := 0 ; { Go full screen} BorderStyle := bsNone ; WindowState

远程控制篇：在DELPHI程序中拨号上网

用MODEM拨号上网,仍是大多数个人网民选择上网的方式．如果能在我们的应用程序中启动拨号连接(如IE浏览器程序中的自动拨号功能),无疑将会方便我们的软件用户(不用再切换应用程序,运行拨号网络),提高我们的软件的友好性从而提高软件的竞争力．在WIN9X下,如果安装了拨号网络,则在WINDOWS系统的系统目录System下将有两个拨号网络管理程序库RasApi32.DLL和RasApi16.DLL,我们可利用其中的函数来创建.修改拨号连接,并利用指定的拨号连接进行拨号上网. 一.新建拨号连接当W

问题-delphi 程序在某电脑中显示？？？问号乱码

问题现象:delphi 程序在某电脑中显示???问号乱码问题原因:因为语言的原因.不同的国家可能显示的编码不一样. 问题处理:“控制面板”>“区域和语言选项”>“区域选项”>“标准和格式”区选择“中文(中国)”>“位置”区选择“中国”>“高级”选项里的“非Unicode程序的语言”区选择“中文(中国)>确定后退出

让delphi程序不受WINDOWS日期格式的影响

http://www.cnblogs.com/hnxxcxg/archive/2013/01/30/2882672.html 如果WINDOWS系统的短日期格式为“yyyy/m/d”,执行下面的代码会报错:2013-01-29 00:00:00不是合法的日期procedure TFrmQuerySale.FormShow(Sender: TObject);varsDate: string;begininherited;// 默认查当天的销售数据sDate := FormatDateTime('y

让delphi程序不受WINDOWS日期格式的影响（使用SetLocaleInfo函数和Application.UpdateFormatSettings）

如果WINDOWS系统的短日期格式为“yyyy/m/d”,执行下面的代码会报错:2013-01-29 00:00:00不是合法的日期procedure TFrmQuerySale.FormShow(Sender: TObject);varsDate: string;begininherited;// 默认查当天的销售数据sDate := FormatDateTime('yyyy-mm-dd', Now);DateTimePicker1.DateTime := StrToDateTime(sDat

delphi 7 mdi子窗体。。。无法更改以命令对象为源的记录集对象的 ActiveConnection 属性。

问题是这样的我做了一个小程序把 adoconnection放到了主窗体连接的是access数据库; 新建了一个子窗体继承自FBase 新建了一个pubulic方法 qrySearch 实现了打开表; formCreate调用了qrySearch方法 ; public procedure qrySearch(cLiuShui: string = '-1'); { Public declarations } end; var FRuKuDan: TFRuKuDan; implementat

C# 向程序新建的窗体中添加控件，控件需要先实例化，然后用controls.add添加到新的窗体中去

C# 向程序新建的窗体中添加控件,控件需要先实例化,然后用controls.add添加到新的窗体中去 Form settingForm = new Form(); setForm deviceSet = new setForm(); settingForm.Controls.Add(deviceSet); settingForm.Show();

delphi程序中定义热键

delphi程序中定义热键用到3个API函数 BOOL RegisterHotKey ( HWND hWnd, //响应该热键的窗口句柄 Int id, //该热键的唯一标识 UINT fsModifiers, //该热键的辅助按键 UINT vk //该热键的键值 ); 为了得到唯一标识,我们还将用到另一个API函数

delphi程序全屏显示无标题栏覆盖整个屏幕

delphi 简单实现程序全屏显示无标题栏,覆盖整个屏幕,这个在做工控机或屏保时有用的,具体代码如下,感兴趣的朋友可以参考下哈 delphi 程序全屏显示无标题栏,覆盖整个屏幕,这个在做工控机或屏保时有用的,所以记下复制代码代码如下: procedure TMainFrm.FormCreate(Sender: TObject); begin with MainFrm do begin { Position form } Top := 0 ; Left := 0 ; { Go full scr

OD调试器调试Delphi程序按钮事件断点方法

这几天我调试一个Delphi程序,总是无法断点按钮事件,像我这样的菜鸟断点按钮事件真心累啊.所以我分享一下我下断点的经验!希望新手们少走弯路!! 工具/原料 OD调试器 Delphi程序方法/步骤先用PEID查壳看看,发现是Delphi的程序,无壳(其实壳已经被我脱了) 这里需要用到一个断点按钮事件插件将一下代码保存为”txt“文本格式: var Addr mov Addr,401000 loop: find Addr,#740E8BD38B83????????FF93

Delphi程序员如何找到高薪的工作？（赚不到钱，原因只有一个，就是他们没有被公司录取。Delphi必须要独自进行深入研究，才能精通，同时也不能自由性太强）

转帖自:http://www.tommstudio.com/ViewNews.aspx?ID=187http://hi.baidu.com/rarnu/blog/ 本文翻译自<美国优秀经理观念大全修订本> 我想现在没有什么比做一个软件工程师更能赚钱的了,当然了,明星除外.在美国,一个优秀的软件工程师,就算在一个平凡的岗位上,也能得到年薪50万(美元)以上的待遇.这绝对不是开玩笑,在北美曾有统计表明,一年内发放给软件工程师的工资以及各种福利,占去了全美净收入的2.4%,这是一个很大的数字. 我是

GDI+在Delphi程序的应用 Photoshop色相饱和度明度功能

本文用GDI+实现Photoshop色相/饱和度/明度功能,参照我的其它有关GDI+在 Delphi程序的应用的文章,代码也可供TBitmap使用. 有些人不喜欢,或者不太懂Delphi的BASM代码,所以本文给出纯PAS代码.须说明的是,纯PAS代码效率较低,不适合实际应用.喜欢C/C++的,可以看本人文章<C++实现Photoshop色相/饱和度/明度功能>,除了语言不同,其它都一样. 有关Photoshop饱和度调整原理可参见<GDI+ 在Delphi程序的应用 -- 图像饱和度调

Delphi 实现获取其他程序的子窗体

通过一个父窗体的句柄,递归的枚举它的子窗体,我们可以最终找到需要的子窗体. 用法如下: nParentHandle: HWnd; nChildHandle: HWnd; nParentHandle := FindWindow(nil, 'Notepad'); if nParentHandle <> 0 then nChildHandle := FindChildWindow(nParentHandle, 'SomeChildEditsClassName'); ------函数代码------

Delphi 程序 最大化 全部窗体也放大

热门专题

Delphi 程序最大化全部窗体也放大