对于TEdit组件,组件是否可以通过将换行符转换为空格来处理来自 Windows剪贴板的多行粘贴？ 换句话说,如果Windows剪贴板上有以下数据： Hello world ! …并且用户将光标放在TEdit中然后按下CTRL V,是否可以让TEdit显示输入为： 你好,世界 ！ 您需要使用插入器类对TEdit进行子类化,并为WM_PASTE消息添加处理程序： unit Unit3; inter

由于不小心使用Delphi接口导致我的应用程序中出现了另一个错误.当我将接口传递给忽略该参数的过程时,实例永远不会被释放.请参阅以下简单示例： ITest = interface procedure Test; end; Tester = class(TInterfacedObject, ITest) public procedure Test; end; Base = cla

我正在尝试创建一个T ShellListView的后代,它接受从 Windows资源管理器中删除的文件.我想处理组件定义中的拖放操作,而不必在任何使用该组件的应用程序中实现它(我已经找到了从Windows资源管理器中删除文件的示例,但所有这些都在应用程序/ TForm级别). 我在构造函数中调用DragAcceptFiles(),并为WM_DROPFILES定义了一个消息处理程序.但是,当我在示例

我试图得到两个日期时间之间的差异,并将其显示为字符串为hh：mm q.parambyname('vstart').asdatetime:= vstart; q.parambyname('vend').asdatetime:= vend; d:= vend-vstart; mins:= d * 1440; q.ParamByName('mins').asBCD:= mins; 目前数据库以分钟为单

我只需要将一个字符串：“STANS”,“Payment,chk#1”,1210.000分成一个基于的数组.字符串列表中的结果将是 STANS Payment, chk#1 1210.000 创建一个TStringList并将逗号分隔的字符串分配给StringList.CommaText.这将解析您的输入并返回拆分字符串作为字符串列表的项目. StringList.CommaText :=

在Delphi 2010中,我定义了一个通用的TInterfaceList,如下所示： type TInterfaceList<I: IInterface> = class(TInterfaceList) function GetI(index: Integer): I; procedure PutI(index: Integer; const Item: I); property

场景： Delphi 2010从svn trunk运行最新的Indy版本. 我有一个使用idHTTP发送http请求的应用程序.只要应用程序正在运行,此idHTTP只创建一次并保存在内存中.我向同一个http服务器(也是我开发的应用程序)发送了大量的Web请求. 我使用keep-alive来保持套接字连接. 在几次请求之后,我在客户端获得了一个EIdConnClosedGracefully,并且在

我的应用程序定期上传大文件.无论大小如何,所有文件在上传到服务器之前都会被压缩. 此项目要求的一部分是在崩溃/电源故障后恢复良好,所以现在压缩是这样完成的： > large-file.bin切成N片 >压缩每个切片&上传它 在崩溃的情况下,我从最后一片中拾取. 为了优化上传速度,我目前正在寻找发送整个文件(如果失败则恢复上传)而不是逐个发送切片,所以我正在考虑压缩整个文件而不是压缩每个切片. 我目

我只是冒险在Delphi 2010中编写我的第一个基于套接字的程序.我尝试使用Indy,没有成功,甚至只编写一个可以发送数据包的简单客户端和服务器.然后我使用TTCPServer和TTCPClient,使用以下“简单得到”演示相同的结果： – Emmbercadero TTCPServer demo Emmbercadero TTCPClient demo 我为客户端和服务器应用程序启动了2个ID

有没有人知道如何在Delphi 2010 IDE中设置打开项目的初始文件夹或打开文件对话框？我第一次将D2010安装在USB硬盘驱动器上,打开的对话框总是恢复到 Windows驱动器-D,而Delphi在驱动器R上. 在“工具”|“选项”|“环境选项”中,可以设置“默认项目”目录.

TVirtualStringTree默认情况下,如果它是聚焦的 – 它将在鼠标滚轮上滚动,即使鼠标没有过度控制(除非它在另一个TVirtualStringTree上). 是否有一种快速而优雅的方法来禁用此行为？ 我已经使用OnMouseWheel事件做了这个,并检查了PtInRect,如果Mouse.CursorPos是否超过控件,但我觉得有更好的方法来做同样的事情,因为这样我必须为每个定义一个新

我正在构建一个需要以下内容的小型多层面板： >它必须用Delphi编写 >必须支持Internet连接(不仅是LAN) >通过HTTP工作 >支持一些数据包加密(可能是自定义的) >能够向服务器发送命令 >能够从服务器接收响应 >最多可以将8个播放器连接到一台服务器 >能够将复杂对象(可能是JSON序列化)传递给服务器 您是否认为新的Delphi 2010 Datasnap可以在这种情况下成功使用

我需要从选择框中的一些数据中解析出值. 示例：< option value =“1”> Apple< / option>< option value =“2”> Chicken< / option> 用法：如果option = apple则获取值. 有什么建议？ DIHtmlParser？我不确定它是多么“轻巧”,但拉尔夫的组件似乎总是很好地组合在一起.他通常也会积极参与Embarcadero的论

我有一个预先面试的任务,我已经完成并且解决方案有效,但是由于使用了TADODataset,我被标记了并没有接受采访.我基本上导入了一个填充数据集的CSV文件,数据必须以特定的方式处理,所以我使用数据集的过滤和排序来确保数据按我想要的方式排序然后我做了while循环中的逻辑处理.收到的反馈说这很糟糕,因为对于大文件来说这会很慢. 我的主要问题是,如果使用内存数据集处理大型文件的速度很慢,那么从csv

当我尝试在if语句中提取一个方法时,我正面临这个问题.我无法找到任何报告的错误. procedure TForm1.BitBtn3Click(Sender: TObject); var x: integer; b: boolean; begin if true then x := 8 //********************** i try to extract th

我正在尝试将文件上传到Indy(版本10.5.5)TIdHTTPServer. 我一直在寻找解决方案,但到目前为止没有运气,我发现的是旧版本的Indy与Delphi 2010附带的版本不兼容. 我希望实现简单地使用“multipart / form-data”将文件上传到服务器并对其进行解码,这很简单,任何帮助都表示赞赏. 我开始使用 xxm作为使用Delphi构建网站的方法,并且在更改后按下浏览

基本上,我希望一个类能够实现相同通用接口的两个不同版本. 考虑这段代码 type // a generic interface ITest<T> = interface ['{6901FE04-8FCC-4181-9E92-85B73264B5DA}'] function Val: T; end; // a class that purports to imple

使用Delphi 2010和TStringGrid组件,我目前显示数据库查询中的五个fild. 这是我正在做的一个简单的例子 //设置网格 procedure TGriddata.FormCreate(Sender: TObject); begin grdMain.Rows[0].commatext:='"One","Two","Three","Four","Five"'; grdMain.C

我必须翻译一些Fortran 90代码并找到一个有趣的语言功能. 例如,它们定义以下类型和动态数组变量： TYPE WallInfo CHARACTER(len=40) :: Name REAL :: Azimuth REAL :: Tilt REAL :: Area REAL

不应该运行我的应用程序的多个实例.因此项目源包含： CreateMutex (nil, False, PChar (ID)); if (GetLastError = ERROR_ALREADY_EXISTS) then Halt; 现在我想以编程方式重新启动我的应用程序.通常的方式是： AppName := PChar(Application.ExeName) ; ShellExecute(H