Ich denke das er ja die Full version freischaltbar lassen will, also nutz der Kompilerswitch nichts.
Aber die Idee des OnButtonClick zu ändern erscheint mir sinnvoller
du machst 2 Proceduren eine Freeware und eine Fullversion
Bei der Prüfung machst du das dann etwa so :
Delphi-Quellcode:
Procedure Tform1.Fullversion(sender:Tobject);
begin
// Full version Code
end;
Procedure Tform1.Demoversion(sender:Tobject);
begin
// Demo version Code
end;
Procedure Form1.create(..);
begin
..
if Checkfullversion then
Button1.onclick := Fullversion
else
Button1.onclick := Demoversion;
..
End;
so kann der Button aktiviert werden wie man will, es bringt einfach nichts, da der Button ja die Falsche Prozedur ausführt
