Pagina 1 di 1

[RISOLTO]Impedire di pasticciare con lo scroll

Inviato: domenica 10 aprile 2011, 22:34
da giorgiofoga
Ho risposto in modo evidentemente errato a Franzisca .... ma ero convinto che gli servisse qualche cosa per non pasticciare con lo scroll del mouse usando listbox, combobox e altro ancora.... ed era proprio quello sche stavo cercando di risolvere oggi .... tra l'altro mi sono accorto con rammarico che molte proprietà per l'aspetto grafico selezionabili in VBA riguardanti i controlli, in open/libre non esistono sig!!

Comunque ecco la macro che mette i controlli in lettura o lettura/scrittura (io ho usato la proprietà enabled, ma esiste anche la ReadOnly).

Codice: Seleziona tutto

Sub delcavolo
dim mioform As Object
dim casella as object
dim Forms As Object
'dim I as Integer  deve essere una variabile global così posso tenere
'memorizzato il valore per sucessivi riutilizzi fino alla chiusura del db. Ovviamente chiuso il db la variabile si azzera

Forms = ThisComponent.Drawpage.Forms
mioform = Forms.getByName("TUONOMEFORM")

If I = 0 or I = "" then
casella = mioform.getByName("TUONOMELISTBOX")
casella.Enabled = False
I = 1
MsgBox "listbox in sola lettura"
Else
casella = mioform.getByName("TUONOMELISTBOX")
casella.Enabled = True
I = 0
MsgBox "listbox in lettura/scrittura"
EndIf
Ovviamente ho postato tutto anche su LIBREOFFICEFORUM[*]

Re: Impedire di pasticciare con lo scroll

Inviato: lunedì 11 aprile 2011, 21:57
da giorgiofoga
ovviamente dovrò mettere risolto immagino, almeno fino a quando il forum non avrà un contenitore specifico per gli script

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: martedì 12 aprile 2011, 8:11
da vladko
giorgiofoga ha scritto: .... tra l'altro mi sono accorto con rammarico che molte proprietà per l'aspetto grafico selezionabili in VBA riguardanti i controlli, in open/libre non esistono sig!!
..............................
puoi dire quali?
con 3.3.2.c'è fix

Codice: Seleziona tutto

Fix for non-working VBA container controls
ma nn so se centra con quello che dici

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: martedì 12 aprile 2011, 21:17
da giorgiofoga
.........premetto: sono un convinto sostenitore dell'open world ..... però per ora noi con open/libre siamo sprovvisti di controlli per modificere per sempio .... la forma dell'indicatore di apertura di una listbox e tutte quelle altre cosette simili ..... non si può rendere invisibile via macro un controllo su form ( o almeno alcuni) etc [per questa ultima cosa spero proprio di sbagliarmi... mi sarebbe utile].
Se sono stato distratto meglio, vorrà dire che qualcuno mi ha risolto un problema. E' possibile?

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: mercoledì 13 aprile 2011, 7:19
da giannidalmi
sono certo che l'hai già visto ma suggerisco
per rendere invisibile un controllo su form
http://user.services.openoffice.org/it/ ... 1570#p6711
non l'ho provato per tutti i tipi di controllo
comunque ho anch'io notato che molte cose che facevo con VBA (access) non riesco a fare con OO
sicuramente molte di queste non so ancora come si fanno e (forse) lo imparerò in futuro
ne propongo una nel prossimo messaggio
ciao

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: mercoledì 13 aprile 2011, 7:20
da giannidalmi
sono certo che l'hai già visto ma suggerisco
per rendere invisibile un controllo su form
http://user.services.openoffice.org/it/ ... 1570#p6711
non l'ho provato per tutti i tipi di controllo
comunque ho anch'io notato che molte cose che facevo con VBA (access) non riesco a fare con OO
sicuramente molte di queste non so ancora come si fanno e (forse) lo imparerò in futuro
ne propongo una nel prossimo messaggio
ciao

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: mercoledì 13 aprile 2011, 7:21
da giannidalmi
sono certo che l'hai già visto ma suggerisco
per rendere invisibile un controllo su form
http://user.services.openoffice.org/it/ ... 1570#p6711
non l'ho provato per tutti i tipi di controllo
comunque ho anch'io notato che molte cose che facevo con VBA (access) non riesco a fare con OO
sicuramente molte di queste non so ancora come si fanno e (forse) lo imparerò in futuro
ne propongo una nel prossimo messaggio
ciao

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: mercoledì 13 aprile 2011, 9:12
da giorgiofoga
In effetti hai ragione tu (ma non te lo scrivo tre volte :D ) .... col Button funziona .... con la list o la text (esempio) no. Immagino che funzioni su tutti i controlli di origine "grafica" per così dire, e su nessuno di quelli strettamente attinenti ai dati. Ma come il solito ... tiro ad indovinare. E anzi spero che qualcuno me ne dica una di diversa.

una saluto con encomio a Giannidalmi

ciao ciao

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: mercoledì 13 aprile 2011, 21:56
da giannidalmi
la mattina presto non sono mai sicuro di ciò che faccio per cui.... faccio 3 volte

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: mercoledì 13 aprile 2011, 22:00
da giannidalmi
l'ho 'ri'provato con una listbox e ha funzionato
ciao
molte grazie per l'encomio che però spetta a borch http://user.services.openoffice.org/it/ ... file&u=591

P.S. c'è modo di cancellare=eliminare i messaggi scritti troppe volte (almeno 2 su 3)?

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: venerdì 15 aprile 2011, 13:40
da giorgiofoga
Scusami ma a questo punto ho bisogno di avere una lezione ......

.enable(False) ovviamente l'ho usato .... risultato "notenable" non "notvisible". Insomma a me resta l'immagine in grigetto. Tu sai come fare a farla scomparire?? (magari utilizzando colore white per la trasparenza??)

A dire il vero Andrew Pitoniack sul sua AndrewBase spiega un sistema ..... ma non ho ancora capito bene la meccanica dei Listner quindi non l'ho nemmeno provato. Diciamo che con un trucco è possibile farlo .... ma servono 10-20 righe di pgr aggiuntive.

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: venerdì 15 aprile 2011, 14:47
da codicem
Forse puoi provare questo:

Codice: Seleziona tutto

.EnableVisible = False
però non ho provato se funziona ma sicuramente non fa visualizzare l'elemento nel formulario.

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: sabato 16 aprile 2011, 7:37
da giannidalmi
vedi un pò l'esempio
carica il formulario 'anagrafica1' e seleziona il 'cognome'
poi vedi il modulo3
ciao

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: sabato 16 aprile 2011, 20:52
da giorgiofoga
@codicem .... grazie veramente utile. sinceramente non l'avevo visto. curiosità: da dove?

@giannidalmi ... l'esempio che hai postato è quello che hai chiesto? Bhè Veramente bravo. ma avevo capito pere per mele .... :lol:

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: domenica 17 aprile 2011, 7:26
da giannidalmi
ho usato un file che avevo creato come esempio per un'altra richiesta (http://user.services.openoffice.org/it/ ... =13&t=1659) e gli ho aggiunto un pezzo per esemplificare la funzione che visualizza/nasconde un controllo.
PERò POI HO ALLEGATO LA VERSIONE VECCHIA! :oops:
ora provo a inviare quella buona

riproviamo:
carica il formulario 'anagrafica1' e seleziona il 'cognome'
poi vedi il modulo3

scusami
ciao

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: domenica 17 aprile 2011, 11:00
da codicem
giorgiofoga ha scritto:grazie veramente utile. sinceramente non l'avevo visto. curiosità: da dove?
da il buon xergio e il suo IcsTools

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: domenica 17 aprile 2011, 11:38
da giorgiofoga
@giannidalmi bhe no ..... allora ho capito giusto ..... bravo di nuovo .....

Re: [RISOLTO]Impedire di pasticciare con lo scroll

Inviato: domenica 17 aprile 2011, 11:47
da giorgiofoga
@codicem .... azzolina e pensare che ci ero già stato ..... bhè comunque adesso l'ho salvato nella cartella Oobacis ... così non me ne dimentico. Grazie anche a xsergio allora.