Les Forums de PalmAttitude.org > Gestion du type de control pour un couper...

Version complète : Gestion du type de control pour un couper...

Les Forums de PalmAttitude.org > GENERAL PalmOS > Développement sous PalmOS > Développement HB++

D2P

07/09/2007 à 19:24

Avant, ceci fonctionnait :

CODE

Private Sub Couper_Click()

   Dim champ As Control
   Dim Atraiter As Field

   Set champ = Focus

   If Not champ Is Nothing And champ.Implements(TypeID(Field)) Then
      Set Atraiter=champ
      Atraiter.Cut
   End If

End Sub

Maintenant, depuis la version 2.5, ça retourne cette erreur :

CITATION

error #2113 : cannot convert 'Control' to 'Field'

Comment je fais moi maintenant ?

lolo

07/09/2007 à 19:42

Dans les versions precedentes, le compilateur de HB++ été un peu trop tolérant.
- En changeant le type de Field vers Control, aucun probleme, il y a un control dans le field.
- En changeant le type de Control vers Field, rien ne permet d'assurer que le Control est bien un Field, et donc il peut y avoir une erreur a l'execution. Pour que le programmeur soit bien conscient de ce qu'il fait, il faut maintenant faire une conversion de type explicite:

Dim ctl As Control
Dim fld As Field

Set fld=Field(ctl)

PS: depuis la version 2.5 on peut aussi se passer du mot clef SET donc ecrire: fld=Field(ctl)

Loic

D2P

07/09/2007 à 20:05

Ben oui....

Merci

Ceci est une version "bas débit" de notre forum. Pour voir la version complète avec plus d'information, la mise en page et les images, veuillez cliquer ici.