Stocker des variables dans le code [Résolu]
sp40
Contributeur Dernière intervention
3 juillet 2015
- - Dernière réponse :
sp40
Contributeur Dernière intervention
3 juillet 2015
- 23 avril 2012 à 10:07
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
A voir également:
- Pascal stocker
- C / C++ / C++.NET : Le jeu du pendu avec mots stockes dans un fichier texte - CodeS SourceS - Guide
- C / C++ / C++.NET : Fonctions à taille variable d'arguments - CodeS SourceS - Guide
- C / C++ / C++.NET : DΙtection de l'usage des variables d'un code en c / c++ - avec lex/yacc, f - Guide
- Delphi / Pascal : Gestion stock avec depot et magasins - CodeS SourceS - Guide
- Javascript : Slider (curseur variable) élément javascript - CodeS SourceS - Guide
10 réponses
Meilleure réponse
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Statut
Bonjour,
essaie comme ça:
cantador
essaie comme ça:
Composant.caption := 's' + 'e' + 'c' + 'r' + 'e' + 't';
cantador
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
139 internautes nous ont dit merci ce mois-ci
Salut,
Si c'est juste les captions et autre textes que tu veux cacher, tu peux tres bien les définir à l'ouverture de ton executable compilé : cela te permettrait de crypter et décrypter ces derniers.
Concrètement tu les cryptes et tu fais dans le OnCreate de ta fiche :
C'est lourd mais ca répond pleinement à ta demande
Si c'est juste les captions et autre textes que tu veux cacher, tu peux tres bien les définir à l'ouverture de ton executable compilé : cela te permettrait de crypter et décrypter ces derniers.
Concrètement tu les cryptes et tu fais dans le OnCreate de ta fiche :
Edit1.text:=Decrypt('Mon-Text-Cryptée');
C'est lourd mais ca répond pleinement à ta demande
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
139 internautes nous ont dit merci ce mois-ci
- Messages postés
- 4229
- Date d'inscription
- vendredi 23 juillet 2004
- Statut
Salut,
regarde aussi cette page
[hr]@+Cirec
[hr]
regarde aussi cette page
[hr]@+Cirec
[hr]
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
139 internautes nous ont dit merci ce mois-ci
- Messages postés
- 4307
- Date d'inscription
- samedi 16 octobre 2004
- Statut
ZLib -> ZCompressString et ZDecompressString (fournie avec Delphi : Uses ZLib)
Sinon on peux aussi stocker en base64 ( http://www.delphifr.com/codes/BASE64-BASE64URL-ENCODE-DECODE_51156.aspx )
________________________________________________________
besoin de câbles audio, vidèo, informatique pas cher ?
Sinon on peux aussi stocker en base64 ( http://www.delphifr.com/codes/BASE64-BASE64URL-ENCODE-DECODE_51156.aspx )
________________________________________________________
besoin de câbles audio, vidèo, informatique pas cher ?
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
139 internautes nous ont dit merci ce mois-ci
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Statut
Bonjour,
Désolé Cantador, mais ta solution ne marche pas
Ce n'était pas une solution mais une simple pichenette permettant d'éviter l'association entre la propriété du composant et son texte..
Maintenant, si tu veux plus, il faut passer par les ressources
et charger toutes les propriétés par un load :
[b]
Res := TResourceStream.Create(hinstance, 'CAPTION', RT_RCDATA);
jpg.LoadFromStream(Res);/b
mais c'est très lourd à gérer..
tu peux aussi stocker avec TFileStream (il y a plein d'exemples sur le net)
chaque composant avec ses propriétés,
il faudra ajouter un cryptage de chaque propriété (avant) et mettre une fonction de décryptage avant le chargement.
tu auras caption := decrypt (crypt)
lourd également..
Autre idée, plus simple et d'utiliser un compresseur d'exe, ce qui entre autre présente l'avantage d'accélérer l'ouverture du programme (la compression est rapide)
Inconvénient, il faut compresser à chaque fois, avant de mettre l'appli en service.
Je pense que l'on peut automatiser, s'agissant d'un exe externe.
cantador
Désolé Cantador, mais ta solution ne marche pas
Ce n'était pas une solution mais une simple pichenette permettant d'éviter l'association entre la propriété du composant et son texte..
Maintenant, si tu veux plus, il faut passer par les ressources
et charger toutes les propriétés par un load :
[b]
Res := TResourceStream.Create(hinstance, 'CAPTION', RT_RCDATA);
jpg.LoadFromStream(Res);/b
mais c'est très lourd à gérer..
tu peux aussi stocker avec TFileStream (il y a plein d'exemples sur le net)
chaque composant avec ses propriétés,
il faudra ajouter un cryptage de chaque propriété (avant) et mettre une fonction de décryptage avant le chargement.
tu auras caption := decrypt (crypt)
lourd également..
Autre idée, plus simple et d'utiliser un compresseur d'exe, ce qui entre autre présente l'avantage d'accélérer l'ouverture du programme (la compression est rapide)
Inconvénient, il faut compresser à chaque fois, avant de mettre l'appli en service.
Je pense que l'on peut automatiser, s'agissant d'un exe externe.
cantador
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
Bonjour Monsieur Dubois,
A priori, vu que c'est le texte crypté qu'il faut mettre en paramètre de Decrypt, je pense qu'on verra plutôt un truc avec des hiéroglyphes.
Bonne nouvelle avec XE2, la valorisation de variables n'apparait pas dans l'exécutable... par contre on voit toujours les propriétés des composants.
A Cantador :
Je suis effectivement passé par des ressources cryptées. ça m'a permis de réviser les fichier .res ...
merci encore
Simon
A priori, vu que c'est le texte crypté qu'il faut mettre en paramètre de Decrypt, je pense qu'on verra plutôt un truc avec des hiéroglyphes.
Bonne nouvelle avec XE2, la valorisation de variables n'apparait pas dans l'exécutable... par contre on voit toujours les propriétés des composants.
A Cantador :
Je suis effectivement passé par des ressources cryptées. ça m'a permis de réviser les fichier .res ...
merci encore
Simon