📄 discsystem.dpr
字号:
{此文件 由 DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer 生成}
Project discsystem;
Uses
DBLogDlg in 'DBLogDlg.pas' {TLoginDialog},
DBPWDlg in 'DBPWDlg.pas' {TPasswordDialog},
unit31 in 'unit31.pas' {Tsalere},
Unit2 in 'Unit2.pas' {Tregedit},
Unit1 in 'Unit1.pas' {Tgetin},
Unit3 in 'Unit3.pas' {Tinfo},
Unit4 in 'Unit4.pas' {Tsystemset},
Unit5 in 'Unit5.pas' {Tdatasave},
QRPrgres in 'QRPrgres.pas' {TQRProgressForm},
QRLablEd in 'QRLablEd.pas' {TQRLabelEditorForm},
QRPrev in 'QRPrev.pas' {TQRStandardPreview},
Unit6 in 'Unit6.pas' {Tusers},
Unit7 in 'Unit7.pas' {Tmemclass},
Unit8 in 'Unit8.pas' {Tpro},
Unit9 in 'Unit9.pas' {Tdiscclass},
Unit10 in 'Unit10.pas' {Tbiao},
Unit11 in 'Unit11.pas' {Tinmem},
Unit12 in 'Unit12.pas' {Tmemmb},
Unit13 in 'Unit13.pas' {Tworkroom},
Unit14 in 'Unit14.pas' {Tlentdisc},
Unit15 in 'Unit15.pas' {Tsaledisc},
Unit16 in 'Unit16.pas' {Tlentdiscmb},
Unit17 in 'Unit17.pas' {Tsalediscmb},
Unit18 in 'Unit18.pas' {Twantbuy},
Unit19 in 'Unit19.pas' {Tnoin},
Unit20 in 'Unit20.pas' {Twantbuyre},
Unit21 in 'Unit21.pas' {Tmembuysort},
Unit22 in 'Unit22.pas' {Tmemlentsort},
Unit23 in 'Unit23.pas' {Tdiscsalesort},
Unit24 in 'Unit24.pas' {Tdisclentsort},
Unit25 in 'Unit25.pas' {Twantbuymemony},
Unit26 in 'Unit26.pas' {Tdiscsalememony},
Unit27 in 'Unit27.pas' {Tdisclentmemony},
Unit28 in 'Unit28.pas' {Tmemmemony},
Unit29 in 'Unit29.pas' {Tnewdisc},
Unit30 in 'Unit30.pas' {Tlentre},
Unit32 in 'Unit32.pas' {Tnoback},
Unit33 in 'Unit33.pas' {Tdiscsales},
Unit34 in 'Unit34.pas' {Tlentandback},
Unit36 in 'Unit36.pas' {Ttodaylentre},
Unit37 in 'Unit37.pas' {Ttodaysale},
Main in 'Main.pas' {Tmainform};
{$R *.RES}
begin
{
00584B60 55 push ebp
00584B61 8BEC mov ebp, esp
00584B63 83C4F0 add esp, -$10
00584B66 53 push ebx
00584B67 B8B0465800 mov eax, $005846B0
* Reference to: SysInit.@InitExe(Pointer);
|
00584B6C E88F23E8FF call 00406F00
* Reference to TApplication instance
|
00584B71 8B1D24835800 mov ebx, [$00588324]
00584B77 8B03 mov eax, [ebx]
* Reference to: Forms.TApplication.Initialize(TApplication);
| or: QForms.TApplication.Initialize(TApplication);
|
00584B79 E85646EEFF call 004691D4
00584B7E 8B03 mov eax, [ebx]
* Possible String Reference to: '实用音像租赁与销售管理系统'
|
00584B80 BAD04B5800 mov edx, $00584BD0
* Reference to: Forms.TApplication.SetTitle(TApplication;AnsiString);
|
00584B85 E85642EEFF call 00468DE0
00584B8A 8B03 mov eax, [ebx]
00584B8C 83C050 add eax, +$50
* Reference to: System.@LStrClr(void;void);
|
00584B8F E888FCE7FF call 0040481C
* Reference to Tgetin instance
|
00584B94 8B0DB0845800 mov ecx, [$005884B0]
00584B9A 8B03 mov eax, [ebx]
* Reference to class Tgetin
|
00584B9C 8B156C894D00 mov edx, [$004D896C]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
00584BA2 E84546EEFF call 004691EC
* Reference to Tregedit instance
|
00584BA7 8B0D38845800 mov ecx, [$00588438]
00584BAD 8B03 mov eax, [ebx]
* Reference to class Tregedit
|
00584BAF 8B15107E4D00 mov edx, [$004D7E10]
* Reference to: Forms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
| or: QForms.TApplication.CreateForm(TApplication;TComponentClass;void;void);
|
00584BB5 E83246EEFF call 004691EC
00584BBA 8B03 mov eax, [ebx]
* Reference to: Forms.TApplication.Run(TApplication);
|
00584BBC E8AB46EEFF call 0046926C
00584BC1 5B pop ebx
* Reference to: System.@Halt0;
|
00584BC2 E845FBE7FF call 0040470C
00584BC7 00FF add bh, bh
00584BC9 FFFF DB $FF, $FF //
00584BCB FF1A call [edx]
00584BCD 0000 add [eax], al
}
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -