Zitat:
Da der String mit 'SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN' in deiner Exe wohl als Konstantenstring hinterlegt und somit von einem Scanner lesbar ist (Schau Dir die EXE mal mit nem HEX-Viewer an) wird dass wohl der Grund für die Maleware einstufung sein!.
Sorry Nein!
Ohne UPX meldet Malwarebytes keine Probleme.
Ein Malware Scanner sollte eigentlich in der Lage sein eine Datei mit UPX zu entpacken und nicht global alle Anwendungen damit verteufeln.
Deshalb ist die Heuristik dieses Scanner eigentlich untauglich.
Es ist auch kein Konstantenstring.
Delphi-Quellcode:
procedure AutoReg(Set1: Boolean);
var
Reg: TRegistry;
Pfad:
string;
begin
try
Pfad := '
"' + ParamStr(0) + '
"';
Reg := TRegistry.Create;
Reg.RootKey := HKEY_CURRENT_USER;
Reg.OpenKey('
\SOFTWARE\Microsoft\Windows\CurrentVersion\Run', false);
if Set1
then
begin
Reg.Writestring(Name4Registry, Pfad);
MessageDlg('
Autostart set (for current user)', mtInformation, [mbOK], 0);
end
else
begin
Reg.DeleteValue(Name4Registry);
MessageDlg('
Autostart disabled', mtInformation, [mbOK], 0);
end;
Reg.Closekey;
Reg.Free;
except
MessageDlg('
Could not access Autostart key', mtError, [mbOK], 0);
end
end;