Guten Morgen liebe
DP Freunde
Ich habe ein kleines problem und zwar:
versuche ich hiermit die version abzufragen, es funktioniert soweit auch aber da mein program nach höhere werte schaut glaubt er das 43 jetzt höere version ist als die eigentliche version
das wiederum verursacht ganz klar einen error (erste ist version, zweite anzahl der archive/downloads)
36.01.11 43
Delphi-Quellcode:
var InfFile:TExtFile;
Inf : String;
Ini : Tinifile;
RInf : TStringlist;
I : Integer;
begin
assignfile(InfFile,'history.config');
ReseT(InfFile);
Read(InfFile,inf);
CloseFile(InfFile);
label1.Caption:=inf;
Localver:=inf;
ini:=Tinifile.Create(ExtractFilePath(ParamStr(0))+'update.ini');
with ini do
begin
H:=ReadString('Launcher','Host','');
D:=ReadString('Launcher','Path','');
P:=ReadInteger('Launcher','Port',0);
end;
ini.Free;
with HTT do
begin
Port:=P;
end;
RInf:=TStringlist.Create;
RInf.Delimiter:=' ';
try
RInf.DelimitedText:= htt.Get(H+'/'+D+'/history.config');
except
MessageBox(0,'Error while loading version Information','Error',16);
exit;
end;
for i:=0 to RInf.Count -1 do
begin
if not (RInf.Strings[i] <> Localver ) then
begin
Remotever:=RInf.Strings[i];
label2.Caption:=RInf.Strings[i];
try
updateIt(Remotever,StrToInt(RInf.Strings[i+1]));
finally
assignfile(InfFile,'history.config');
ReWrite(infFile);
Write(InfFile,RInf.Strings[i]);
CloseFile(InfFile);
end;
break;
end;
end;
end;
meine frage jetzt, wie kann ich aus der version 36.01.11 die punkte rausnehmen um sie dann so zu vergleichen?