realbasic-nug.fr
[Top] [All Lists]

Re: Accéder à une de mes propriété de fenêtre

To: REALbasic NUG French <realbasic-nug.fr@lists.realsoftware.com>
Subject: Re: Accéder à une de mes propriété de fenêtre
From: "emile.a.schwarz" <emile.a.schwarz@wanadoo.fr>
Date: Wed, 29 Jul 2009 17:22:28 +0200 (CEST)
Authentication-results: mx.google.com; spf=neutral (google.com: 74.124.194.228 is neither permitted nor denied by best guess record for domain of realbasic-nug.fr-bounces@lists.realsoftware.com) smtp.mail=realbasic-nug.fr-bounces@lists.realsoftware.com
Delivered-to: listarchive@realsoftware.com
Reply-to: REALbasic NUG French <realbasic-nug.fr@lists.realsoftware.com>
Sender: realbasic-nug.fr-bounces@lists.realsoftware.com
Bonjour,

le bout de code passé marche très bien, merci, là n'est pas le problème.

Je reprends:

Dans ma fenêtre Window1, j'ai ajouté une propriété foo as integer.

Comment puis-je lire cette propriété après avoir lancé le code d’Arnaud, genre

Dim w As Window
Dim w2 As Window1

If WindowCount>0 Then
w = window(0)
If w IsA Window1 Then
w2 = Window1(window(0))
End if
End if

MsgBox "Il y a " + Str(w2.foo) + " crocodiles dans le lac."


Je ne cherche pas à faire (par exemple):

MsgBox Str(w2.Title)

C’est plus clair ?

Emile

> Message du 29/07/09 16:48
> De : "Arnaud Nicolet" 
> A : "REALbasic NUG French" 
> Copie à : 
> Objet : Re: Accéder à une de mes propriété de fenêtre
> 
> 
> Le 29 juil. 09 à 16:25, emile.a.schwarz a écrit:
> 
> > Bonjour,
> >
> > merci pour la réponse.
> >
> >> Ça vous convient?
> > Non, car je ne peux pas faire foo = w2.MyFoo
> > (myFoo et foo étant de même type, integer par exemple).
> 
> Et bien, si vous n'y arrivez pas, c'est pas de ma faute, car moi j'y 
> arrive (je viens de tester, au cas où).
> Vous pouvez peut-être montrer un bout de code pour qu'on puisse voir 
> ce qui est faux?
> 
> 





<Prev in Thread] Current Thread [Next in Thread>