easylinux/SignauxComplexes
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

V8.7

Browse Source 
V8.7
This commit is contained in:
f1iwq2
2024-04-06 16:54:03 +02:00
parent 1f2fa711ca
commit b10f983b0b
26 changed files with 4349 additions and 2848 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
verif_version.pas
View File

@@ -26,7 +26,7 @@ var
chemin_Dest,chemin_src,date_creation,nombre_tel : string;
f : text;
Const VersionSC ='8.6'; // sert à la comparaison de la version publiée
Const VersionSC ='8.7'; // 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;
@@ -149,11 +149,8 @@ end;
// dézipe copie les fichiers et lance la nouvelle version
// s : chemin et fichier à déziper
procedure dezipe_copie_lance(s : string);
var fichier,nomPDF : string;
dirList : tStrings;
SR : TSearchRec;
nombre,i,attributes : integer;
pdf,ok : boolean;
var
i : integer;
begin
// Vérifier si répertoire dest existe