EXTRACTEUR D'ICÔNE ASSEZ COMPLET

cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 5 janv. 2003 à 17:25
moustic126 Messages postés 1 Date d'inscription mardi 7 octobre 2008 Statut Membre Dernière intervention 7 octobre 2008 - 7 oct. 2008 à 11:23
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/12259-extracteur-d-icone-assez-complet

moustic126 Messages postés 1 Date d'inscription mardi 7 octobre 2008 Statut Membre Dernière intervention 7 octobre 2008
7 oct. 2008 à 11:23
Bonjour,
Je suis lucie, j'ai téléchargé dans ton site un extracteur d'îcone, car il me manque dans mon Pc, après un reformatage complet, des applications win32.exe.
Je ne suis pas informaticienne, mais je me débrouille pas mal. Mais là, je suis larguée ! Pourquoi lorsque je réinstalle des logiciels ou des applications, j'ai toujours le même message "application Win32.exe non valide.
Pourrais-tu m'aider ? je t'en remercie d'avance.
Lucie
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 33
5 janv. 2003 à 23:51
Voilà une bonne résolution prise en ce début d'année ;-()
Puissent tes paroles être entendues...
sebastienbro Messages postés 246 Date d'inscription dimanche 14 avril 2002 Statut Membre Dernière intervention 5 août 2004 2
5 janv. 2003 à 17:55
Je crois k'il fodrai mieu que je recommence tout ! Je vais m'y mettre dès maintenant ! Bye
sebastienbro Messages postés 246 Date d'inscription dimanche 14 avril 2002 Statut Membre Dernière intervention 5 août 2004 2
5 janv. 2003 à 17:53
Je sais, je sais, chui po tre tre doué. Mais bon, c'est en faisant des erreurs kon apprend, n'est ce pas ?! Je recommencerais plus !! Bye
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 33
5 janv. 2003 à 17:25
Aaaaaaaaaaaaaaarrrrrrrghhhhh !
Des Label et des Goto !
Des If à gogo pour tester l'existence de clés dans la BDR alors que tu viens de les créer :
if not Registre.KeyExists('SoftWareIcone extractor1.00_fr') then
begin
Registre.CreateKey('SoftwareIcone extractor1.00_fr');
if Registre.OpenKey('SoftWareIcone extractor1.00_fr', false) then
Ce qui peut s'écrire :
if not Registre.KeyExists('SoftWareIcone extractor1.00_fr') then
begin
Registre.OpenKey('SoftWareIcone extractor1.00_fr', TRUE) then

Quant à l'application principale :
1/- il faut disposer du composant TXpMenu livré avec Delphi 7, n'est-ce pas ?

2/- Dans la procédure LectureRegistre, tu écris :
Registre := Tregistry.create;
if Registre.OpenKey('SoftWareIcone extractor1.00_fr', false) then
begin
Form1.Left := Registre.ReadInteger('X');
Form1.Top := Registre.ReadInteger('Y');

Or, si la clé n'existe pas, tu essaies de lire quand même les données contenues dans 'X' et 'Y'.
--------------
procedure TOptProg.Button4Click(Sender: TObject);
var
i: integer;
begin
for I := 0 to 5 do
CheckListBox1.Checked[I] := true;
end;

procedure TOptProg.Button6Click(Sender: TObject);
var
i: integer;
begin
for I := 0 to 5 do
CheckListBox1.Checked[I] := true;

end;
Quelle est la différence entre ces deux méthodes ?
----------------------
Bon, on va s'arrêter là...
Bordélique, tu dis ?
Le mot n'est pas trop fort !
Rejoignez-nous