This commit is contained in:
f1iwq2
2025-03-01 13:42:15 +01:00
parent 3d109c0b3c
commit 662da541c0
21 changed files with 14472 additions and 529 deletions

View File

@@ -26,7 +26,7 @@ var
f : text;
Const
VersionSC = '9.8'; // sert à la comparaison de la version publiée
VersionSC = '10.0'; // sert à la comparaison de la version publiée
SousVersion=' '; // A B C ... en cas d'absence de sous version mettre un espace
// pour unzip
SHCONTCH_NOPROGRESSBOX=4;
@@ -178,7 +178,6 @@ var
shellobj,srcfldr, destfldr, shellfldritems,repertoire: Olevariant;
filtre: string;
i : integer;
erreur : integer;
begin
result:=false;
filtre:='';
@@ -294,7 +293,7 @@ function verifie_version : real;
var description,s,s2,s3,Version_p,Url,LocalFile,nomfichier,date_creation_ang : string;
faire,trouve_version,trouve_zip,zone_comm,LocZip : boolean;
fichier : text;
i,j,erreur,Ncomm,i2,l : integer;
i,j,Ncomm,i2,l : integer;
V_utile,V_publie : real;
SV_publie : char;
taille : longint;