Klassen-Funktion benutzen, ohne die Klasse zu erstellen

[guinnes]

Zitat von Medium:

Du willst mich nicht verstehen

Das mag so sein, oder du mich nicht ?
Es ist schon ein Unterschied, ob in der Exe das steht :

Delphi-Quellcode:

DreckMain.pas.78: Caption := fClass.Foo(S);
004666AD 8D4DF8           lea ecx,[ebp-$08]
004666B0 8B55FC           mov edx,[ebp-$04]
004666B3 8B83E0020000     mov eax,[ebx+$000002e0]
004666B9 E81AFFFFFF       call TMyClass.Foo
004666BE 8B55F8           mov edx,[ebp-$08]
004666C1 8BC3             mov eax,ebx
004666C3 E8F4CCFBFF       call TControl.SetText

oder das :

Delphi-Quellcode:

DreckMain.pas.77: if fClass <> nil then
004666AE 8BB3E0020000     mov esi,[ebx+$000002e0]
004666B4 85F6             test esi,esi
004666B6 7417             jz TForm1.Button1Click + $47
DreckMain.pas.78: Caption := fClass.Foo(S);
004666B8 8D4DF8           lea ecx,[ebp-$08]
004666BB 8B55FC           mov edx,[ebp-$04]
004666BE 8BC6             mov eax,esi
004666C0 E813FFFFFF       call TMyClass.Foo
004666C5 8B55F8           mov edx,[ebp-$08]
004666C8 8BC3             mov eax,ebx
004666CA E8EDCCFBFF       call TControl.SetText

Vor allem, weil die Funktionalität gleich ist