Delphi
文章平均质量分 51
fangyuan621
事在人为,路在人走,业在人创。
展开
-
Delphi 回调函数及例子
功能大体描述:Form1中有一个Edit和一个Button,当点击BUTTON时弹出FORM2,FORM2中也有一个EDIT和一个BUTTON,当点击FORM2中的BUTTON时,将FORM2中的EDIT的TEXT属性赋值给FORM1中的EDIT的TEXT。回调函数主要在两个场合使用,第一个是某些Windows的API要求用回调函数作为其参数地址,另一种是用户在某种特定的场合定义的某个函数需要使用回调函数作为其参数地址,对于用户的定义的函数来说,一般是当调用动态连接库中的函数时使用。转载 2022-09-19 16:14:54 · 480 阅读 · 0 评论 -
Delphi回调函数及其使用
功能大体描述:Form1中有一个Edit和一个Button,当点击BUTTON时弹出FORM2,FORM2中也有一个EDIT和一个BUTTON,当点击FORM2中的BUTTON时,将FORM2中的EDIT的TEXT属性赋值给FORM1中的EDIT的TEXT。回调函数主要在两个场合使用,第一个是某些Windows的API要求用回调函数作为其参数地址,另一种是用户在某种特定的场合定义的某个函数需要使用回调函数作为其参数地址,对于用户的定义的函数来说,一般是当调用动态连接库中的函数时使用。转载 2022-09-19 16:12:18 · 584 阅读 · 0 评论 -
Delphi写的DLL回调C#
C#的调用Delphi的DLL没有问题,DLL回调时遇到了麻烦,网上找了个方法,解决了这个问题。Delphi部分,列举了三种回调函数定义。转载 2022-09-19 16:11:18 · 398 阅读 · 0 评论 -
Delphi 调用C# 编写的DLL方法
一、打开vs2005自带的工具“Visual Studio 2005命令提示”,输入 TlbExp 路径/TestClass.dll 得到一个TestClass.tlb 文件。打开Delphi,选择“Project”--“import type library”找到刚才的TestClass.tlb,点击 CreateUnit,向delphi中引入一个com接口。近来,因工作需要,必须解决Delphi写的主程序调用C#写的dll的问题。Regasm 路径/TestClass.dll 向系统注册此dll。转载 2022-09-16 10:31:31 · 1891 阅读 · 0 评论 -
Delphi7程序调用C#写的DLL解决办法
一、打开vs2005自带的工具“Visual Studio 2005命令提示”,输入 TlbExp 路径/TestClass.dll 得到一个TestClass.tlb 文件。打开Delphi,选择“Project”--“import type library”找到刚才的TestClass.tlb,点击 CreateUnit,向delphi中引入一个com接口。本人用第二种方法已正常实现功能,但DLL中一些自动创建的方法无法在外部直接调用,需要DLL准备特定的接口函数。{ //自己的代码 }转载 2022-09-16 10:30:28 · 432 阅读 · 0 评论 -
delphi 给力版 GetProcAddress
consttypeend;pascal;asm@@Loop:@@Found:@@Exit:end;转载 2022-09-15 17:34:38 · 479 阅读 · 0 评论 -
delphi静态和动态调用dll的实例
静态===================动态==================转载 2022-09-15 17:11:16 · 734 阅读 · 0 评论 -
如何使用网络调试助手调试UDP
最近的一个项目需要使用UDP,在网上下载了一个网络调试助手的小工具进行调试,非常方便,在这里简单的向大家介绍一下它的使用方法,仅供参考,其他类似的调试工具都差不多。转载 2022-09-09 17:09:17 · 7976 阅读 · 1 评论 -
could not bind socket. address and port are already in use
本文转自鹅倌51CTO博客,原文链接:http://blog.51cto.com/kaixinbuliao/1609239。5.继续输入tasklist|findstr "端口",回车,查看是哪个进程或者程序占用了端口。4. netstat -ano|findstr "端口",找到最後一列PID。6.任務管理器,查看選擇列 找到PID,結束該進程。,如需转载请自行联系原作者。转载 2022-09-09 17:02:06 · 2497 阅读 · 1 评论 -
DELPHI中build和compile有什么区别?
Build编译全部与工程相关联的文件,可包括版本信息及工程中的预编译变量等;Compile只重新编译更改过的相关单元及文件,调试是Compile就可以了,若是发布,则Build为好。Build是从新编译所有和生成exe有关的文件,无论.pas文件是否修改过,它都会重新生成新的.dcu,并从新链接这些.dcu等等文件。Compile是编译修改过的文件,它只生成新修改过的.pas的相应的.dcu,并从新链接这些改变过的.dcu等等文件。好的代码像粥一样,都是用时间熬出来的。原创 2022-09-05 17:54:35 · 630 阅读 · 0 评论 -
delphi操作多显示器
早上老师找我做的一个小程序,他的系统为一个主机,拖了6台显示器,为了显示程序(在一个屏幕上用录像专家)需要做一个适时监控多屏幕的软件,和远程控制的不一样,那个是多这个主机。最后完成后发现显示的效果不佳,个人认为是因为缩放后的缘故(缩放比大),时间仓促,就写了一个点击某个屏幕,打开一个窗体,显示比较大的该屏幕的图(缩放比小),效果还可以。//获取屏幕的矩形区域。...转载 2022-09-01 08:05:37 · 590 阅读 · 0 评论 -
图像旋转控件 TRotateImage Ver1.54(支持D3~D2010)
把uses DsgnIntf 改为 uses DesignIntf,并且在Package Requires列表中加入DesignIDE.dcp,该文件在$(BDS)/Lib目录下。非常优秀的图像旋转控件(最新版)---TRotateImage Ver1.54,支持从Delphi 3 到最新的 Delphi 2010。在Library中加入$(BDS)/Lib/ToolsAPI 的搜索路径。...转载 2022-09-01 08:04:23 · 176 阅读 · 0 评论 -
Delphi中开发使用多显示器的应用程序
top=0,其它显示器的left和top是相对于主显示器的,如主显示器的分辨率为1366×768,另外一个显示器为1440×900,那么这个显示器的left=1366,如果连接多个显示器,那么其中有一个为主显示器,其left=0,所以通过设定mainform的left、top、width、height来让程序在指定显示器上面显示。// 写入ini文件,在程序启动时直接在上次设定的显示器显示。这个方法通过指定显示器号,让程序在指定的显示器上面运行。...转载 2022-09-01 08:03:25 · 825 阅读 · 0 评论 -
Delphi 获取屏幕分辨率与Windows任务栏的高度
showmessage('本机分辩率:'+ inttostr(screen.WorkAreaWidth) +' * '+inttostr(screen.WorkAreaHeight));//高: screen.WorkAreaHeight;//宽: screen.WorkAreaWidth;第一种:需要引用Windows单元。第二种:需要引用Windows单元。第三种:要引用ShellAPI单元。...原创 2022-08-30 14:56:49 · 1026 阅读 · 0 评论 -
解决SQL Server2008 R2安装时报25541错误(备忘)
解决: 将machine.config.default拷贝一份,重命名为machine.config。然后将该新文件放于C:\Windows\Microsoft.NET\Framework64\v2.0.50727\CONFIG\目录下。分析:在该C:\Windows\Microsoft.NET\Framework64\v2.0.50727\CONFIG\目录下发现的确找不到machine.config文件,但可以找到machine.config.default文件。转载 2022-08-20 19:12:25 · 1269 阅读 · 0 评论 -
Delphi 折叠代码编译变量$REGION
编译变量$REGION,用于在delphi2006以后版本的折叠代码显示,非常方便。{$REGION '显示uStr变量内容'}转载 2022-08-19 08:55:42 · 434 阅读 · 0 评论 -
音频库-bass使用
先用Bass.BASS_StreamCreateFile创建音频流,第一个参数是文件名,第二个参数是文件流开始位置,第三个是文件流长度 0为使用文件整个长度,最后一个是流的创建模式。OK了,现在添加Bass.Net的引用。第一个参数是输出设备的编号,-1是采用默认设备输出,第二个参数是输出采样率,第三个参数是初始化设备的输出模式,最后一个是句柄,为本窗体的句柄就可以了。然后用Bass.BASS_ChannelPlay来播放音乐,第一个参数是刚才创建的音频流句柄,第二个是是否要重新开始播放。...原创 2022-08-18 08:23:50 · 1469 阅读 · 0 评论 -
delphi 属性 参数 新注释,在写代码的时候,可以自动看到属性、参数的的备注说明,太方便了。
delphi 属性 参数 新注释,在写代码的时候,可以自动看到属性、参数的的备注说明,太方便了。原创 2022-08-16 18:05:56 · 298 阅读 · 0 评论 -
delphi中pos的用法
1.含义pos(a,b)函数用法,取出子串a,在父串b中第一次出现的位置。2.举例pos(‘A’,‘DDDAD’),则返回结果是4.3.应用nicez在strX字符串中是否存在的判断if (Pos(‘nice’,strX)>0)thenbegin…end原创 2022-06-30 16:20:23 · 559 阅读 · 0 评论 -
delphi二维数组如何定义
在 delphi (Object Pascal 语言)中,使用 array 关键字进行数组定义。如果需要定义二维数组可以采取以下定义形式:一、静态数组定义静态数组定义,通常用于数组元素的数目确定的情况。定义形式如下:示例:1234567891011 二、动态数组定义动态数组常用于当数组的元素数目不确定的时候,其定义形式如下:1234 二维动态数组的元素数目,可以通过 SetLenth 来动态指定,示例代码如下:12345678910111213141516171819202122原创 2022-06-29 17:37:48 · 2482 阅读 · 0 评论 -
Delphi 折叠代码编译变量$REGION
procedure TForm1.Button1Click(Sender: TObject);var uStr: UnicodeString;begin{$REGION '显示uStr变量内容'} uStr := 'ok'; ShowMessage(uStr);{$ENDREGION}end;原创 2022-06-29 17:36:28 · 208 阅读 · 0 评论 -
delphi 最小化最大化按钮不显示
delphi 7 最小化最大化按钮不显示,只显示一个关闭按钮。在属性窗口设置:form1.BorderIcons.biMaximize=false;//最大化form1.BorderIcons.biminimize=false;//最小化//form1.bidiMode=bdRightToLeftNoAlign;第一种方法是设置窗体的BorderIcons/biMaximize属性为False,这种方法仅让窗体的最大化按钮灰掉; 第二种方法是设置窗体的BorderStyle属性为bsDialog原创 2022-06-20 10:26:30 · 558 阅读 · 0 评论 -
vs2019如何调试 vs2019如何编译运行
易供求网(yigongqiu.com)又是一个阳光明媚的天气,新的一天又是这么可爱,大家好,我是“易供求网”小编,今天为大家带来不一样的精彩内容,vs2019如何调试 vs2019如何编译运行的文章,希望各位看官给小编动手评论转发喔!您的每一次评论转发都会带来好运气喔!如何在vs2019创建新项目?创建新项目很容易。具体方法如下。1. 单击“新建”按钮,然后单击“从现有代码创建项目”以在项目中创建项目。2. 选择CreateVC项目类型,然后单击next。3. 首先,单击“预览”按钮找到转载 2022-04-11 17:14:23 · 4335 阅读 · 0 评论 -
DELPHI与C#语法比较
1、我做了三年的.NET,也是三个月前因为项目需要转的delphi整个过渡差不多要一周到两周。正常情况两周后就能熟悉delphi。delphi可以调整开发环境的,你把他的属性和解决方案窗口调成和你用VS一样的用起来就习惯多了。语法的话pascal和C#都是能拉控件的,做起来都是一个模式,非常类似。即便是自己写组件,个人感觉delphi写起来更简单些。如果是做数据库软件的话,delphi用起来就相当方便,和数据库连接代码几乎不用写的。如果是用delphi做工控或网络编程也差不多。delphi.转载 2022-04-11 16:45:34 · 2302 阅读 · 0 评论 -
Delphi转换为C#时小知识点
Delphi转换为C#时小知识点序号 Delphi c# .Net 备注 1 CHR(8) \b 退格符 2 Pos(CHR(8),strText) strText.IndexOf("\b") 第一个退格符在strText中的位置(返回int类型) 位置:Delphi从1开始数,.Net从0开始数 所以,当字符串中没有这个符号的时候Delphi=0,.Net=-1 3 ...转载 2022-04-11 16:43:10 · 591 阅读 · 0 评论 -
Visual Studio无法调试
一、最近Visual studio调试不起来,运行完报错 二、解决方法 打开 调试>>>>选项>>>>常规>>>对ASP.NET启用JavaScript调试勾勾去掉 转载于:https://www.cnblogs.com/xqz0618/p/wfts.html...转载 2022-04-11 14:22:30 · 11926 阅读 · 0 评论 -
pos函数的使用
function Pos(Substr: string; S: string): Integer;1函数描述:pos函数在字符串表达式s中查找子串substr。pos函数查找串s内的子字符串,并以整型量返回子串substr首字符在串s中的位置。如果子串substr没有被找到,则返回0。举例:pos(‘()’,’google()’)=7以上为个人总结,有不妥之处,请在评论中指出.————————————————版权声明:本文为CSDN博主「Deen12520」...转载 2022-04-02 09:55:06 · 2578 阅读 · 0 评论 -
Delphi7学习第一天
不积跬步,无以至千里。宁静才能致远。从数学系转到软件工程,开始的过程是抓狂的。有人说有两种人是值得钦佩的:一种是为了自己的兴趣而痴狂的人、一种是坚持把一件令自己痛苦的事做出成绩的人。我成不了第一种人、所以我必须让自己努力成为第二种人。对编程从不感冒的我,得朝着IT工程师的道路迈进。提前进入研究生生涯,努力让自己成为技术出身。实验室,将成为我生活的重要的部分。第一天感慨略多。今天正式开始Delphi7的学习,想把自己的所学所获和大家一起分享,共勉。第一次写这样的文档,过程必定是渐进的,转载 2022-04-02 09:51:17 · 534 阅读 · 0 评论 -
Delphi 7学习第六天-简单登陆界面的实现
第一次尝试一天码两篇文章,分享知识的过程是快乐的。上午试着去做一个简单的登陆界面,基本上算完成了。登录名和密码要与数据表中匹配,才能登陆成功。这里采用的是Delphi的ADO连接SQL server数据库,具体连接过程,可参照我前两天的博客,这里不再赘述。现在将设计的过程分享下。1、设计的界面及运行的结果运行的时候要保证ADOtable1的active的属性为true.同时保证SQL服务已经开启。我的需要手动开启。登陆成功后进入的界面:2、附上源码:unit Welco转载 2022-04-02 09:48:25 · 1049 阅读 · 0 评论 -
Delphi 2010 调用WebService接口
Delphi 调用WebService接口此测试程序使用Delphi2010编写打开Delphi2010一、File-> New-> Application 新建一个工程在窗体上放置三个 Button按钮,一个ComboBox,两个Edit, 一个Memo和一个HTTPRIO二、到File-> New-> Other-> WebServices-> WSDL importer在打开的WDSL对话框,在Location of WSDL File ..转载 2022-03-28 19:59:21 · 781 阅读 · 0 评论 -
Delphi 重启自身程序代码
Unit Unit1;interfaceusesWinapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes,Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls,ShellAPI;typeTForm1 = class(TForm)Button1: TButton;procedure Button1Click(Se转载 2022-03-28 16:19:34 · 651 阅读 · 0 评论 -
delphi2007、2010无法二次启动,报错 EditorLineEnds.ttr 另一个程序正在使用此文件
问题现象:delphi2007、2010无法二次启动,报EditorLineEnds.ttr被占用,而且进程中一直有bds.exe的进程?问题原因:问题处理:方法一:可能是系统更新的东东造在的。KB2970228和KB2982791。KB2970228和KB2976897。KB2993651。方法二:实在没法了,就用批处理吧。@echo offset NewFileName="%TEMP%\%date:~0,4%%date:~5,2%%date:~8,2%%time:~0,2%%tim.转载 2022-03-28 16:18:40 · 749 阅读 · 0 评论 -
如何关闭并重新启动DELPHI中的当前应用程序?
uses ShellAPI;...procedure TForm1.RestartThisApp;begin ShellExecute(Handle, nil, PChar(Application.ExeName), nil, nil, SW_SHOWNORMAL); Application.Terminate; // or, if this is the main form, simply Close;end;转载 2022-03-28 16:17:27 · 479 阅读 · 0 评论 -
Delphi定时关机、重启计算机、执行外部程序
Delphi定时关机、重启计算机、执行外部程序https://www.veryhuo.com/down/html/33213.html#download转载 2022-03-28 16:16:06 · 639 阅读 · 0 评论 -
BusinessSkinForm VCL
BusinessSkinFormVCL-BusinessSkinFormVCL(有120多个组件)能帮助你创建能够更换皮肤的应用程序。为商业应用程序创建稳定且功能多样化的包装。产品功能:使用SmartFlash您能在您的应用程序中(flash窗体、菜单、控件等)创建flash接口。SmartFlash可用在:BusinessSkinFormVCL可应用于:lDelphi2009,2010lC++Builder2009,2010lDelphi2007l...原创 2022-03-22 16:15:33 · 480 阅读 · 0 评论 -
请问delphi Xe10中如何像delphi7那样搜索代码?
Search -> Find in File快捷键:Ctrl + Shift + F原创 2022-03-22 15:28:57 · 302 阅读 · 0 评论 -
delphi Delphi写的一个上位机
基于SPCOMM控件。源码:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, SPComm, ExtCtrls;type TForm1 = class(TForm) Comm1: TComm; GroupBox1: TGroupBox; go:...转载 2022-03-21 16:51:40 · 687 阅读 · 0 评论 -
Delphi StringGrid控件的用法
Delphi StringGrid控件组件名称:StringGrid ●固定行及固定列:StringGrid.FixedCols:=固定行之数;StringGrid.FixedRows:=固定列之数;StringGrid. FixedColor:=固定行列之颜色;StringGrid.Color:=资料区之颜色;●资料行列之宽高度:StringGrid.DefaultColWidth:=内定全部之宽度;StringGrid.Default...转载 2022-03-21 16:50:44 · 3163 阅读 · 0 评论 -
delphi里如何实现打开一个窗口,必须关掉它才能打开另一窗口
Application.CreateForm(TFrom,From);Form.ShowModal;ShowModal()就是使该窗口为当前窗口,并且其它窗口不能使用...原创 2022-03-18 16:36:40 · 355 阅读 · 0 评论 -
delphi里如何实现打开一个窗口,必须关掉它才能打开另一窗口
Application.CreateForm(TFrom,From);Form.ShowModal;ShowModal()就是使该窗口为当前窗口,并且其它窗口不能使用...原创 2022-03-18 16:35:10 · 358 阅读 · 0 评论