Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

13 commentaire(s) de akim77 sur des sources sur tout CodeS-SourceS

Le : 26/02/2009 13:30:03
Source : SCREENMATE, COMPAGNON D'ÉCRAN

J'ai ouvert le fichier Lezard.dsp avec VC2005
qui a convertit le projet.
La seule erreur vient d'une variable inutilisée:
ON_WM_SETCURSOR()
qu'il suffit de supprimer pour que l'exe soit généré.

En dernier recours l'exe est ici:
http://greenmesa.free.fr/downloads.html

A+


Le : 08/06/2008 11:08:36
Source : MARIO ONLINE
Salut,

Si cette "Source Qui merite pas être uploader" alors ne l'upload pas.
C'est évidant que tu ne dois pas considérer CodeS-SourceS comme ta poubelle.

Akim


Le : 31/05/2008 10:47:51
Source : CALCUL DE MORTIER ET BETON

Tu aurais dû citer clementpat, l'auteur de la source originelle:
http://www.vbfrance.com/codes/CALCUL-MATERIAUX-BRIQUE-PARPAING-BETON-SABLE-CIMENT-GRAVIER_22645.aspx

Tu devrais même retourner voir cette source , car clementpat utilise 64 briques au mètre carré et toi 20.


Le : 16/05/2008 12:07:16
Source : CONVERSIONUTM.NET

Salut BarresLTD,


Quand on dépose une source ici, c'est aussi pour qu'elle soit vue
par le plus grand nombre et quel meilleur moyen que de:
- donner une description qui donne envie d'ouvrir le zip
  (pourquoi pas celle de la version en VB6)
- mettre une copie d'écran
  (même si le fond vert que tu as choisi n'est pas celui que je préfère)

Pour l'aspect pratique:
Tu devrais vérifier que toutes les "cases" indispensables ne soient pas vides
et "numériques" (sinon message d'erreur disgracieux),
et peut-être simplement les initialiser à zéro.

Pour E/W et N/S pour tolérer les minuscules tu peux utiliser UCase:
If UCase(DirEW) = "E" Then
et mettre une valeur par défaut (dans l'état actuel avec des "cases" vides c'est W et S)
ou mieux gérer les choix par des OptionButton

A+

Akim


Le : 03/01/2008 20:20:45
Source : CALCULETTE POUR LES TRÈS, TRÈS, VRAIMENT TRÈS GRANDS NOMBRES
J'avais fait une fonction Puissance ( une simple boucle de la fonction Multiplication ), mais les temps de calcul étaient "inhumains" ( 2^10000 en plus d'une minute )


Public Function Puissance(X As String, Y As String, cde As Boolean, nb_chiffres As Long) As String
Puissance = ""
nb_chiffres = 0
If X <> "" And Y <> "" Then
    If verify_entiers_positifs(X, Y) Then
        If X = "0" Then
            Puissance = "0"
        Else
            If X = "1" Or Y = "0" Then
                Puissance = "1"
            Else
                If Val(Y) > 0 And Val(Y) < 10001 Then '10001 temps de calcul inhumain ???(a determiner)
                    Puissance = X
                        Dim j
                        For j = 1 To Val(Y) - 1
                            Puissance = Multiplication(Puissance, X, 0, 0)
                        Next j
                        nb_chiffres = Len(Puissance)
                Else
                    Puissance = "Y est trop grand, temps de calcul inhumain, trouver une autre methode"
                End If
            End If
        End If
    Else
        Puissance = "Des nombres entiers positifs uniquement"
    End If
End If
End Function

Pour info: Val(Y) donne un Double
et
20^55=360287970189639680000000000000000000000000000000000000000000000000000000
temps calcul < 1 sec (ouf!)

Vois le prog de DNOB700
http://www.vbfrance.com/codes/JUSTE-AUTRE-LIBRAIRIE-CALCUL-PRECISION-INFINIE_22182.aspx
plus "pro" que le mien.


Le : 16/05/2007 22:34:03
Source : PROGRAMME QUI ENREGISTRE LES ACTIONS DE LA SOURIS ,LES TOUCHES CLAVIER DE A -> Z ,ET LE CLAVIER NUMERIQUE

Vraiment efficace ce programme.

J'ai fait la modif suivante pour eviter d'enregistrer quand le curseur est sur Form1
As tu une meilleure solution ?

Private Sub Timerrec_Timer()

Dim Retour As Long
gauche = GetAsyncKeyState(1): 'bouton gauche
droite = GetAsyncKeyState(2): 'bouton droit souris
'enregistre
Dim PosCursor As POINTAPI
    r& = GetCursorPos(PosCursor)
'on ecrit dans le fichier la position x et la position y
  Print #1, PosCursor.X 'efface et écrit...
  Print #1, PosCursor.Y 'idem

'la modif
If PosCursor.X * 15 < Form1.Left Or PosCursor.X * 15 > Form1.Left + Form1.Width Or PosCursor.Y * 15 < Form1.Top Or PosCursor.Y * 15 > Form1.Top + Form1.Height Then

etc...
End If
End Sub

A+


Le : 09/09/2006 21:17:34
Source : SCREENMATE, COMPAGNON D'ÉCRAN
Tu as raison. Mais quand je fait une rotation même légère du sprite au milieu de l'écran, le mouvement du lézard est saccadé.
Il faudrait peut-etre plus d'images.
Je crois que j'ai encore un peu de travail !


Le : 12/08/2006 09:41:55
Source : EFFET TYPEWRITER (WIN32)
Enfin une nouveauté, en plus avec un code clair et bien commenté.
Bravo !

Une suggestion pour plus de réalisme:
Eviter la régularité mécanique lors de la frappe.
Peut-être en faisant varier le temps entre chaque frappe,
ou en ayant 5 ou 6 sons différents pour les touches normales,
ou en ...


Le : 15/07/2006 18:34:36
Source : DECORS & COLLISION 3D (EN MOINS DE 200 LIGNES)
Tu peux utiliser jtedit un modeleur gratuit: http://www.jtgame.com/jtedit/jteditmain.html


Le : 14/07/2006 06:36:42
Source : DECORS & COLLISION 3D (EN MOINS DE 200 LIGNES)
Beau travail de vulgarisation !

Avec la verion 1.1 j'avais une "erreur Automation"
Dans mdlMain.bas j'ai ça :
        'mPrim.Flip Nothing, DDFLIP_NOVSYNC
        mPrim.Flip Nothing, DDFLIP_NOVSYNC Or DDFLIP_WAIT

Bye



1


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version


HTC G1

Entre 449€ et 449€


Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,250 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.