Newsgroup: it.comp.lang.visual-basic
Titolo: Abilitare Copia Incolla

Come si fa' ad abilitare il copia incolla con i tasti nelle caselle di testo
o dove occorre?
Sto lavorando su un progetto con piů form, in alcuni form funziona
normalmente in altri no, per copia ed incollare devo usare il tasto destro
del mouse e ...
Scusate la domanda sicuramente elementare ma non trovo soluzione da solo.
--
Saluti, Vitt
www.pbase.com/vitt

 Sto lavorando su un progetto con più form, in alcuni form funziona


 o dove occorre?
CUT
Bip.....utilizzare l'apparato locomotore per premere F1...
..Cercare...
Clipboard
Si consiglia di cercare
Clipboard.SetText
Bip!
----------------------------------------------------------
Tutti siamo liberi...anche di non premere F1!
Ma se lo premiamo...
ci liberiamo dalle domande stupide!
----------------------------------------------------------
(M.M.)

 > Sto lavorando su un progetto con piщ form, in alcuni form funziona


 Clipboard.SetText
Apparato locomotore connesso!! (anche gia da prima comunque)
Premendo F1 mi compare: L'insieme MSDN non esiste, reinstallare MSDN ... ok
lo reinstallero
Comunque non sono certo di trovare li dentro la mia risposta ... a me non
interessa sapere come utilizzare la ClipBoard, a me interessa avere
abilitati i tasti "short" CTRL C - V e X nelle finestre ... ripeto che nello
stesso progetto in un paio di form le li trovo automaticamente abilitati
mentre in altri no!!
So' che potrei fare la gestione dei tasti per ogni finestra testo ma visto
che senza fare niente in altri form funziona vorrei capire come fare a farli
funzionare ed eventualmente disabilitare ...
--
Saluti, Vitt
www.pbase.com/vitt

 funzionare ed eventualmente disabilitare ...
abilita il keypreview del form , cosi tutti i tasti ( tranne il tab mi
pare ) arrivano prima all'oggetto form e poi li passa all'oggetto col focus
!
cosi puoi fare quello che vuoi leggendo il keycode in keyup e keydown:
if shift <> 0 then ' ha premuto shift ctrl o alt
...
  if Ctrl_V_Abilitato = false then shift = 0  ... ' disattivi i tasti ctrl
shift e alt

Tagliare, copiare e incollare testo con l'oggetto Clipboard
SetText e GetText sono due tra i più utili metodi dell'oggetto Clipboard.
Consentono il trasferimento di dati stringa negli e dagli Appunti, come
illustrato nella figura 12.2.
Figura 12.2 Spostamento di dati negli e dagli Appunti con SetText e GetText
(fig non disponibile)
SetText copia il testo negli Appunti, sostituendo qualsiasi testo
memorizzato in precedenza. È possibile utilizzare SetText come
un'istruzione. La sintassi è la seguente:
Clipboard.SetText dati[, formato]
GetText restituisce il testo memorizzato negli Appunti. Viene utilizzato
come una funzione:
destinazione = Clipboard.GetText()
Combinando i metodi SetText e GetText con le proprietà di selezione
descritte in "Utilizzo di testo selezionato", è possibile attivare in modo
semplice i comandi Copia, Taglia e Incolla per una casella di testo. Le
seguenti routine di eventi implementano questi comandi per i controlli
denominati mnuCopy, mnuCut e mnuPaste:
Private Sub mnuCopy_Click ()
   Clipboard.Clear
   Clipboard.SetText Text1.SelText
End Sub
Private Sub mnuCut_Click ()
   Clipboard.Clear
   Clipboard.SetText Text1.SelText
   Text1.SelText = ""
End Sub
Private Sub mnuPaste_Click ()
   Text1.SelText = Clipboard.GetText()
End Sub
Nota L'esempio risulta più appropriato se si tratta di controlli menu in
quanto è possibile utilizzare i menu mentre Text1 ha lo stato attivo.
Si noti che le prime due routine (comandi Copia e Taglia) svuotano
innanzitutto gli Appunti con il metodo Clear. Gli Appunti non vengono
svuotati automaticamente in quanto i dati possono essere inseriti in vari
formati diversi, come descritto in "Utilizzo di più formati negli Appunti"
più avanti in questo capitolo. Entrambe le routine copiano quindi negli
Appunti il testo selezionato in Text1 con la seguente istruzione:
Clipboard.SetText Text1.SelText
Nella riutine per il comando Incolla, il metodo GetText restituisce la
stringa di testo contenuta negli Appunti. Un'istruzione di assegnazione
copia quindi questa stringa nell'area selezionata della casella di testo
(Text1.SelText). Se non è selezionato alcun testo, il testo viene
posizionato in corrispondenza del punto di inserimento nella casella di
testo:
Text1.SelText = Clipboard.GetText()
Questo codice presuppone che tutto il testo venga trasferito nella e dalla
casella di testo Text1, tuttavia è ancora possibile copiare, tagliare e
incollare tra Text1 e i controlli degli altri form.
Poiché gli Appunti sono condivisi dall'intero ambiente, il testo può anche
essere trasferito da Text1 a qualsiasi altra applicazione.
Utilizzo della proprietà ActiveControl
Se si desidera utilizzare i comandi Copia, Taglia e Incolla con qualsiasi
casella di testo con lo stato attivo, utilizzare la proprietà ActiveControl
dell'oggetto Screen. Il codice che segue rappresenta un riferimento per
qualsiasi controllo con lo stato attivo:
Screen.ActiveControl
È possibile utilizzare questo codice come qualsiasi altro riferimento ad un
controllo. Sapendo che il controllo è una casella di testo, è possibile fare
riferimento a tutte le proprietà supportate per le caselle di testo, incluse
Text, SelText e SelLength. il seguente codice presuppone che il controllo
con lo stato attivo sia una casella di testo e utilizza la proprietà
SelText:
Private Sub mnuCopy_Click ()
   Clipboard.Clear
   Clipboard.SetText Screen.ActiveControl.SelText
End Sub
Private Sub mnuCut_Click ()
   Clipboard.Clear
   Clipboard.SetText Screen.ActiveControl.SelText
   Screen.ActiveControl.SelText = ""
End Sub
Private Sub mnuPaste_Click ()
   Screen.ActiveControl.SelText = Clipboard.GetText()
End Sub
--------------------------------
Inviato via 
http://usenet.libero.it

"Gigio2k [work]" <n...@mail.please> ha scritto nel messaggio
news:uPkh9.1357$wr.2...@twister1.libero.it...

Avevo gia letto e provato in precedenti post del "keypreview del form" ma
non funziona, non cambia nulla ... Comunque nella descrizione del comando
dice che questo: Restituisce o imposta un valore che determina se gli eventi
della tastiera per un oggetto vengono generati prima degli eventi della
tastiera per i controlli dell'oggetto ...
Poco chiaro come discorso esplicativo ma sta di fatto che non ha la funzione
di abilitare o meno gli "short" con la tastiera ...
--
Grazie comunque per la segnalazione, saluti, Vitt
www.pbase.com/vitt

 Tagliare, copiare e incollare testo con l'oggetto Clipboard
Grazie per al testo che mi hai mandato sono riuscito a risalire all'origine
del problema (anche se non a capirlo del tutto viste alcune incongruenze
pratiche in altri form) in pratica io avevo i controlli impostati su caselle
di testo RFT, ho aggiornato i comandi aggiungendo Screen.ActiveControl e
adesso va' a meraviglia ...
Nella vita sono le cose piu semplici e stupide che fanno inciampare ...
figuriamoci le complesse!!!
--
Saluti, Vitt
www.pbase.com/vitt

 figuriamoci le complesse!!!
DATO CHE NON HAI LA GUIDA IN LINEA TI HO INVIATO IO LA PARTE CHE TI
SERVIVA.....
QUANDO LA INSTALLERAI TI CONSIGLIO DI ANDARLA A VEDERE CI SONO MOLTI ESEMPI,
FORSE SCOPRI CHE NON E' POI COSI' TANTO DIFFICILE COME SEMBRA....
SALUTISSIMI
