-
Notifications
You must be signed in to change notification settings - Fork 16
/
Copy pathWinDroid.dpr
48 lines (41 loc) · 1.18 KB
/
WinDroid.dpr
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
program WinDroid;
uses
FastMM4,
madExcept,
madLinkDisAsm,
madListHardware,
madListProcesses,
madListModules,
Vcl.Forms,
System.SysUtils,
Winapi.Windows,
WSAManager in 'WSAManager.pas' {frmWinDroid},
frmApkInstaller in 'frmApkInstaller.pas' {frmInstaller},
Vcl.Themes,
Vcl.Styles,
frmBrowser in 'frmBrowser.pas' {frmWeb},
helperFuncs in 'helperFuncs.pas',
adb in 'adb.pas',
frmApkViewer in 'frmApkViewer.pas' {frmApkViewerWnd},
RegChangeThread in 'RegChangeThread.pas',
TaskbarPinner in 'TaskbarPinner.pas',
wsa in 'wsa.pas';
{$R *.res}
begin
ReportMemoryLeaksOnShutdown := True;
// WsaClient process Mutex {42CEB0DF-325A-4FBE-BBB6-C259A6C3F0BB}
if CreateMutex(nil, True, '{42CEB0DF-325A-4FBE-BBB6-C259A6C3F0BC}') = 0 then
RaiseLastOSError;
if GetLastError = ERROR_ALREADY_EXISTS then
begin
Exit;
end;
Application.Initialize;
// Application.MainFormOnTaskbar := False;
// Application.ShowMainForm := False;
Application.CreateForm(TfrmWinDroid, frmWinDroid);
Application.CreateForm(TfrmInstaller, frmInstaller);
Application.CreateForm(TfrmWeb, frmWeb);
Application.CreateForm(TfrmApkViewerWnd, frmApkViewerWnd);
Application.Run;
end.