delphi 7中的事件DrawColumnCell如何工作？

[英]How works the event DrawColumnCell from delphi 7?

我正在使用此事件 (DrawOnColumnCell) 将 datetimepicker 放入 DBGrid 中，在名为“fechaprobablealta”的字段中更精确。 这个网格有一个客户端数据源，它有一个 providerDataSet，它从 SQLDataSet 中获取数据。 在我尝试更新 ...

如何使用 tadodataset delphi 从多表中读取记录并在发布时保存在表中

[英]How read records from multi table with tadodataset delphi and save in a table when post

我有一个连接到 AdoDataset 的网格。 我想使用连接 SQL 从两个表中读取记录，但将记录保存在一个表中。 读取数据： 我只想在发布时保存 Table1 字段 ...

从 Delphi 中 SQL 查询的输出中复制数据

[英]Copy data frrom the output of an SQL query in Delphi

我有一个 SQL 选择查询，它提取特定记录的“名字”字段。 运行查询的输出是一个唯一的字符串。 我希望将此字符串（名字）复制到标签的标题中。 我怎么能在德尔福做到这一点？ ...

在运行时错误 Delphi 中创建自定义 TPanel

[英]Creating Custom TPanel in run Time Error Delphi

我创建了一个“TPanel”派生类的实例，其中包含一些代码来修改其边框，如下所示： 然后我尝试像下一个一样创建它： 但是我收到错误“控制”没有父窗口“...。 感谢帮助。 德尔福 7 赢 7 ...

如何保存和加载 TFrame 内容？

[英]How to save & load TFrame contents?

我使用以下代码来保存和加载我的表单： 它适用于 Form，但当尝试对TFrame执行相同操作时，它不起作用，因为它没有CreateNew过程。 如何保存和加载此框架？ 特别是如果它包含动态创建的控件。 Windows 7, Delphi 7. ...

如何在 Delphi 的 MainForm 中访问 MDI Child 的组件？

[英]How to access MDI Child's component in MainForm in Delphi?

我使用 Delphi 编写代码。 当我按下按钮时，它会创建一个新的 MDI 子窗体。 所以，程序有多个 MDI 子窗体，我想在 MainForm 中访问每个子窗体的组件（例如，计时器）。 MainForm 是 fsMDIForm，而 ChildForm 是 fsMDIChild。 这是我尝试过的 ...

BASS 库：从 memory 播放

[英]BASS library: playing from memory

我正在尝试使用 BASS dll 播放 MemStream: TMemoryStream 中的声音片段。 我可以从 wav 文件中读取它并且播放正常，但我想让它直接读取 memory stream。 我已经在 FormCreate 上初始化了声音设备 Then I create a sine wa ...

Delphi 7 上的 TChromeTabs：选项卡中的图像渲染错误

[英]TChromeTabs on Delphi 7: bad rendering of images in Tabs

我在TChromeTabs 7 上使用Paul Spencer Thornton的 TChromeTabs 并且我有一个无法解决的问题：当我想在TChromeTab中显示图像时，它们显示的图形很差，几乎没有 colors 但是，图像在 Object Inspector 中正确显示，如果我打开TIma ...

Delphi 7 中的 Indy 10.6.2 idFTP - 接收文件时文件名中的本机符号问题 - 可能是 DefStringEncoding 的不良行为

[英]Indy 10.6.2 idFTP in Delphi 7 - problem with native symbols in filenames while receiving files - probably bad behavior of DefStringEncoding

我将 Indy 10.6.2 与 Delphi 7 和 Windows 10 64 位波兰语一起使用。 我运行 FTP 服务器： FTPServer: TIdFTPServer ，并通过使用FTPClient: TIdFTP我试图在其文件名中获取包含国家符号的文件。 不幸的是，在OnRetrieve ...

Delphi 7 动态 Arrays 长度

[英]Delphi 7 Dynamic Arrays Length

我正在使用动态 arrays 来存储密钥、像素和加密像素。 该程序在第一次加密期间运行顺利，但在更改图片时，程序崩溃“模块'Project2.exe'中地址00401BF1的访问冲突。 写入地址 00000001'。 我认为这是因为我在加载图片按钮中放置了setLength过程。 这是我加载图片后使 ...

如何使这个脚本与两个或多个变量一起工作？

[英]how to make this script works with two or more variables?

问题是我想在除“NOTEPAD”之外的条件下创建双变量，就像我想添加“CHROME”或其他变量一样。 可能吗？ 我已经尝试过使用这种语法 但这是行不通的谢谢。 新案例，所以我在尝试将 TEdit 值连接到 if 条件时遇到问题。 这是我的完整代码，它可以工作并且已经编译，但在软件运行时被强制关闭， ...

TMaskEdit 后代中闪烁的 TSpeedButton

[英]Flickering TSpeedButton in a TMaskEdit descendant

我尝试创建一个类似TComboBox的组件，从TMaskEdit继承，在编辑本身内部带有一个TSpeedButton 。 当我在编辑中输入内容时，大部分按钮都消失了（右侧和底部边缘仍然可见）。 如果我将鼠标移到组件上或使用 TAB 退出，按钮会再次出现。 这是代码： 我想念什么？ ...

如何使用 Delphi 编写代码以通过 RS232 接收数据计数？

[英]How to make code to receive data counting via RS232 with Delphi?

我想使用 Delphi 7 制作一个简单的设备，通过 RS232 与我的计算机通信。该电路很简单，一个带有 220 欧姆电阻、0.1uF 电容器、+5VDC 电源、RS232 连接器和 USB 到 RS232 适配器的按钮。 简单电路的output将连接到电脑端的pin 2（Rx pin）。 每当 ...

有没有办法只从字符串中获取 ANSI 字符？ 当字符串包含表情符号时，Utf8decode 失败

[英]Is there a way to get just the ANSI characters from a string? Utf8decode fails when string contains emojis

首先，我从 HTTP 请求中获得一个 TMemoryStream，其中包含响应的正文。 然后我将它加载到 TStringList 中并将文本保存在宽字符串中（也尝试使用 ansistring）。 问题是我需要转换字符串，因为用户语言是西班牙语，所以带有重音符号的元音很常见，我需要存储信息。 如果响应 ...

TTimer 作为组件属性问题

[英]TTimer as a component property issue

我从 (TShape) 创建了一个新组件，并将 Timer 属性设置为下一个:: 此计时器的目的是我希望它通过使用下一个过程在设计时更改组件高度： 它工作得很好，但是我在运行时使用它后注意到的问题是它使应用程序太慢了...... 任何人都可以解释此类问题的原因和解决方案.. 感谢你。 ...

Delphi 7 - 用 DEC 加密，用 PHP OpenSSL 解密（第二部分）

[英]Delphi 7 - Encrypt with DEC, and decrypt with PHP OpenSSL (Part II)

请参考我之前的问题：Delphi 7 - 用 DEC 加密，用 PHP OpenSSL 解密 My Delphi 7 client app (ICS components) is sending base64 encoded data as a parameter in a HTTP POST r ...

Delphi 7 - 用 DEC 加密，用 PHP OpenSSL 解密

[英]Delphi 7 - Encrypt with DEC, and decrypt with PHP OpenSSL

使用：Delphi 7，DEC v5.2 请参考这个问题： Delphi 7 - DCPCrypt - TDCP_rijndael - DecryptString - 如何使它工作？ 从@AmigoJack 的出色回答来看，我的 Delphi Decrypt function 工作正常。 基于此，我 ...

如何在 canvas 上移动两个位图图像

[英]how to move two bitmap-image on a canvas

我正在 Delphi 7 下编写一个 animation 程序，该程序包括在 canvas（我选择一个 PaintBox）上移动两个圆盘，边缘有反弹效果。 如果我一张一张加载图片就可以了：这种情况下，当两个不时到达的磁盘重叠时，没有出现背景矩形，甚至是相当令人愉快的透明效果。 但是，如果我尝试通过引 ...

Delphi 10：String[25] 将一些 char 值更改为“？”我该怎么办？

[英]Delphi 10: What can I do about String[25] changing some char values to “?”

我已将 Delphi 7.1 应用程序移植到 Delphi 10.3。 我有一些简单的加密/解密功能。 如果我加密字符串值并加密它们，一切都很好： 在这种情况下，一切都按预期工作，即使使用特殊字符，加密将是：'y'#$0080'vn' 但如果值为 string[25]，它会以不同方式处理特殊字符： ...

从文本文件中查找字符串，从底部

[英]Finding a string from a text file, from bottom

我需要从底部（行尾）在文本文件中找到某个字符串。 找到字符串后，function 退出。 这是我的代码，它工作正常。 但是，它有点慢。 我的意思是，我每 5 秒运行一次此代码。 它消耗大约 0.5% 到 1% 的 CPU 时间。 文本文件大约 10 MB。 如何加快速度？ 就像，真的很快，它不会消耗 ...