Ai
1 Star 0 Fork 0

phy0292/cheat-engine

加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
文件
该仓库未声明开源许可证文件(LICENSE),使用请关注具体项目描述及其代码上游依赖。
克隆/下载
APIhooktemplatesettingsfrm.pas 1.15 KB
一键复制 编辑 原始数据 按行查看 历史
Dark Byte 提交于 2020-12-11 06:39 +08:00 . dark mode support
unit APIhooktemplatesettingsfrm;
{$MODE Delphi}
interface
uses
LCLIntf, Lmessages, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, LResources, ExtCtrls, betterControls;
type
{ TfrmAPIhookTemplateSettings }
TfrmAPIhookTemplateSettings = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label6: TLabel;
Button1: TButton;
Button2: TButton;
Label5: TLabel;
Panel1: TPanel;
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
implementation
{ TfrmAPIhookTemplateSettings }
procedure TfrmAPIhookTemplateSettings.FormCreate(Sender: TObject);
begin
end;
procedure TfrmAPIhookTemplateSettings.FormShow(Sender: TObject);
begin
button1.autosize:=false;
button2.autosize:=false;
if button1.width<button2.width then
button1.width:=button2.width else button2.width:=button1.width;
end;
initialization
{$i APIhooktemplatesettingsfrm.lrs}
end.
Loading...
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化
1
https://gitee.com/phy0292/cheat-engine.git
git@gitee.com:phy0292/cheat-engine.git
phy0292
cheat-engine
cheat-engine
master

搜索帮助