Indem du den Code im
DPR-Quelltext unterbringst und auf alle externen Units verzichtest. Also auch auf alle Formulare. Eine
MessageBox kannst du auch mit gleichnamigen Befehl aus der Windows-
Unit anzeigen lassen.
Mit Registry-
Unit dürfte das Programm, das ja wohl nur die URLs des IE löschen soll, dann etwa 60k groß sein.
btw:
Reg.Destroy;
sollte besser
Reg.Free;
heißen. Den Tipp mit
try/
finally/
end solltest du auch nicht in den Wind schlagen, denn u.U. kann es auf einem anderen Rechner (an dem du evtl. arbeitest, bzw. jemand, der dein Programm benutzt) Rechteprobleme geben. Zwar bei HKEY_CURRENT_USER eher unwahrscheinlich, aber warum die Möglichkeit riskieren wenn man es vermeiden kann?
Zu guter Letzt: würde es nicht reichen, einfache alle "
url"-Einträge in dem Schlüssel zu entfernen? Die Registry-
Unit bietet passende Funktionen zum Lesen aller Werte und Unterschlüssel
in einem Schlüssel.
Aber selbst wenn du bei deiner Methode bleiben willst, wäre eine for-Schleife wohl günstiger, kürzer und eleganter:
Delphi-Quellcode:
for i := 1
to 25
do
Reg.WriteString('
url' + inttostr(i),'
');