mousesim.dpr

来自「一款delphi编写的鼠标模拟工具,支持热键,采用线程操作方式模拟点击」· DPR 代码 · 共 26 行

program mousesim;

uses
  Forms,inifiles,SysUtils,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas';

{$R *.res}
var i:integer;
IniFile:TIniFile;

begin
  Application.Initialize;
  Application.Title := '点点点';
  Application.CreateForm(TForm1, Form1);
IniFile:=TIniFile.Create(ExtractFilePath(Application.Exename)+'my_config.ini');
i:=IniFile.ReadInteger('setting','hide',0);
if i=1 then
begin
  application.ShowMainForm:=false;
end;
Application.Run;
IniFile.Free;

end.