Imview ___v2.0.8 .... le final ...

0/5 (14 avis)

Vue 5 120 fois - Téléchargée 693 fois

Description

Voilà ...

Je n'ai pas eu le temps de le perfectionner à fond ... ni d'implémenter l'impression ... (G plus d'imprimante ... donc je sais pas tester ...)

Les fonctions demandées ont été implémentée ...

Le prog tourne parfaitement sous XP mais pas sur 95 et NT (pas accès au menu options ... plus problème d'extension).

Le programme restore les anciennes associations d'extensions lors d'un éventuel besoin ... Attention, ne pas le faire manuellement, il riquerai de se perdre ...

Schouly

Codes Sources

A voir également

Ajouter un commentaire Commentaires
lumesh Messages postés 564 Date d'inscription jeudi 21 février 2002 Statut Membre Dernière intervention 7 novembre 2008
6 avril 2002 à 23:06
c vrai ke les utilisateur de win XP n'ont besoin de bcp moins verif leur erreur car bcp de celle ci passe car le system les corrige auto mais pr cx ki kom moi tourne ss win 9x cela est different !
la moindre erreur provoque un plantage ou une popup windows !
Schouly Messages postés 45 Date d'inscription dimanche 21 janvier 2001 Statut Membre Dernière intervention 6 octobre 2006
30 mars 2002 à 14:39
Eh bien lumesh ... un grand merci ... j'ai complètement oublé de tester ça sous win95 .... en effet sous XP ça fonctionne .... je vais ajouter :

LoadPicture(Replace(...,"","")

Schouly
cs_mic Messages postés 77 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 19 septembre 2012
30 mars 2002 à 11:45
Très bien et bonne chance
lumesh Messages postés 564 Date d'inscription jeudi 21 février 2002 Statut Membre Dernière intervention 7 novembre 2008
30 mars 2002 à 09:28
xcuze !
supprime le premier mess stp car g fé une fote ds le code !
encore desole
lumesh Messages postés 564 Date d'inscription jeudi 21 février 2002 Statut Membre Dernière intervention 7 novembre 2008
30 mars 2002 à 09:27
CA YEST G TROUVE !!!!!!!!!
en fait c kan tu cherche d image a la racine d1 lecteur !!!
jexplike:

toi tu met: Pic(i).Picture = LoadPicture(Dir1.Path & "" & File1.List(i))
mais le pb viens de: Dir1.Path & ""
en fait qd le dir1.path est a la racine, il ya deja 1 "" apres les ":" donc avc dir1.path & "" qd t a la racine tu rajoute 1 "" !!!!!
ca fé donc (exemple): "C:\image.gif" et c lé "" ki plante !!!!!!!!!!!!!
moi je te propose de faire:

Dim tmpslash as String
tmpslash=dir1.path
if mid$(tmpslash,len(tmpslash),1)<>"" then tmpslash=tmpslash & ""
Pic(i).Picture = LoadPicture(tmpslash & File1.List(i))

en fait cela permet de rajouter 1 "" ke qd ya besien !
avc ca ca marche impec !
allez @+ (o;þ
Lumesh.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.