Hi,
ich habe hier eine kleine Konsolenanwendung, die unter XP einwandfrei funktioniert und unter Windows 7 nicht:
Delphi-Quellcode:
var
sl : TIniFile;
i,j : integer;
help: string;
begin
if ParamStr(1) = '' then
begin
sl := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'autorun.inf'); //hier müsste der Fehler liegen?!?
help := sl.ReadString('autorun','open','starter.exe index_de.html');
i := Pos(' ',help);
help := Copy(help,i+1,length(help)-i);
j := ShellExeCute(0, nil, PChar(help), nil, nil, sw_Show);
sl.Free;
end
else
...nicht relevant
Kann mir da jemand einen Tipp geben? Der Wert in der autorun.inf wird gar nicht korrekt ausgelesen. Wenn ich mir den Pfad über writeln ausgeben lasse ist dieser allerdings korrekt
.
Viele Grüße ...