Hi,
ich mache grade eine Update-Funktion für mein Prog..
Hier mal der Text mit dem Fehler:
Delphi-Quellcode:
var
stream: TFileStream;
reg: TRegistry;
ini: Tinifile;
begin
stream := TFileStream.Create('Version.ini', fmcreate);
ini := Tinifile.Create('Version.ini');
try
FTPUpdate.Connect;
FTPUpdate.Get('Version.ini', stream);
finally
FTPUpdate.Disconnect;
stream.Free;
end;
try
AEinst.OnVer := ini.ReadString('Version', 'Version', '');
Showmessage(AEinst.OnVer);
finally
ini.Free;
end;
.
.
.
Nun ließt er aba einfach nicht den Wert aus der Ini.
Die sieht so aus:
Code:
[Version]
Version=1_0_0_0
Herunterladen tut er sie auch.
D.h. der Fehler muss in
AEinst.OnVer := ini.ReadString('Version', 'Version', '');
sein. aber da kann man eigentlich nicht so viel falsch machen. Doch nimmt er immer den Alternativ-Wert (in meinem Fall '').
Findet jemand den Fehler.
Gruß Mariaki