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

Re: Controlli come parametri di un metodo

To: REALbasic NUG Italian <realbasic-nug dot it at lists dot realsoftware dot com>
Subject: Re: Controlli come parametri di un metodo
From: Lucio Liberi <lucioing at tin dot it>
Date: Sat, 17 Nov 2007 18:50:04 +0100
Delivered-to: listarchive at realsoftware dot com
Delivered-to: realbasic-nug dot it at lists dot realsoftware dot com
References: <6FF066E4-A202-4662-A45B-9426D42A574B at tin dot it> <5CF965E8-2F23-49BD-B3C9-6BF0F31F600C at omnidea dot it>
Si... funziona alla grande... Grazie Gil...

Quello che mi DISTURBA e' che non avevo pensato al CAST....
'sta cosa la devo ancora digerire... nel senso di capire...
Comunque... funziona.
A questo punto apro un altro post sulle finestre...

Ciao e GRAZZZZZIE

L.

Il giorno 17/nov/07, alle ore 18:12, Gilberto De Faveri ha scritto:


On 17/nov/07, at 17:43, Lucio Liberi wrote:

Immaginate di avere n finestre con n controlli e di dover modificare il 'Caption' di alcuni di questi che sono tutti, per esempio, NELLO STESSO ORDINE.

e cioe':

theWin.control(x)

dove theWin e' la finestra che passo al METODO e control (x) punta al controllo con indice 'x' che voglio modificare.

Bene... qui mi fermo... non so piu' andare avanti... Ma non riesco a modificare il testo di quel maledetto StaticText1...


Prova con qualcosa del genere:

Sub ModText(theWin As Window, theString As String)

  'Ciclo sui controlli della finestra passata come argomenti
  For i As Integer = 0 to theWin.ControlCount

    'Verifico se è un oggetto di tipo StaticText
    If theWin.Control(i) IsA StaticText Then

      'Cast esplicito e accesso alla proprietà
      StaticText(theWin.Control(i)).Caption = theString

    End If

  Next

End Sub

--
gilberto de faveri
omnidea srl

edificio pegaso
parco scientifico tecnologico vega
via delle industrie, 15
30175 venezia marghera

tel +39 041 509 3441
fax +39 041 509 3641

www.omnidea.it




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