Er nimmt beides, aber er gibt eine Fehlermeldung aus:
Zitat:
---------------------------
Devproject
---------------------------
Format '%d' ungültig oder nicht kompatibel mit Argument.
---------------------------
OK
---------------------------
so sieht der Code nun aus:
Delphi-Quellcode:
procedure TfrmUpdate.bbDownloadClick(Sender: TObject);
var
fs : TFileStream;
newVersion : array [0..3] of TVarRec;
begin
{...}
newVersion[0].VInteger := ReadInteger('Version', 'Major', 0);
newVersion[1].VInteger := ReadInteger('Version', 'Minor', 0);
newVersion[2].VInteger := ReadInteger('Version', 'Release', 0);
newVersion[3].VInteger := ReadInteger('Version', 'Build', 0);
lRemoteVersion.Caption := Format('Remote Version: %d.%d.%d.%d', newVersion);
{...}
end;
Die Fehlermeldung wird bei "Format" (Wer hät's gedacht) ausgegeben.
[edit]Ich habs ^^ wenn ich auch noch
newVersion[] die Eigenschaft
VType := vtInteger zuweise klappts auch
mit so
