Newsgroup: it.comp.appl.access
Titolo: Casella di testo rotonda

Vi Prego di non considerare come bizzarra o come presa in giro questa mia
domanda, che francamente lo può sembrare. In un report ho costruito una
casella di testo dove vorrei rappresentare con una faccina l'andamento di un
risultato. Ho scritto la seguente stringa nell'origine del controllo:
=IIf(([Nr]/2)<=[Controllo];"L";"")  formattando con il carattere Wingdings e
la formattazione condizionale appropriata, ottengo la faccina rossa. Vorrei
poter colorare tutta la faccina di rosso, usando la formattazione
condizionale, ma in maniera che risulti rotonda.
Chiedo è possibile costruire una casella di testo per questo scopo rotonda?
Grazie a TUTTI
Fabio

 Fabio
Perchč non usi un controllo immagine e un paio di piccoli files .bmp che
puoi richiamare a piacimento da codice?
Cosě li puoi fare di che dimensione e risoluzione vuoi, anche multicolor,
e non sei legato ai font.
Ciao.
-Marco-
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Marco,
La Tua č un'ottima idea, mi dai una dritta sul codice? Confesso di essere a
digiuno di VBA.
Grazie fin d'ora.
Fabio

 Fabio
Prima crea le due (o più) immagini .bmp e salvale nella stessa cartella
del database (o dove ti è più comodo).
Poi inserisci nel report un controllo immagine scegliendo una qualsiasi
delle immagini, vai sulle proprietà e cancella il nome dell'immagine in
modo che risulti vuota.
Nel codice, sull'evento stampa, puoi assegnare al controllo un'immagine
scrivendone il nome e percorso nella proprietà Picture.
Riporto un esempio. Io ho messo le immagini nella stessa cartella del db,
se le salvi altrove sostituisci CurrentProject.Path con il percorso della
tua cartella.
Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)
    If Me.K2 > Me.K1 Then
        Me.Immagine.Picture = CurrentProject.Path & "X.bmp"
    Else
        Me.Immagine.Picture = CurrentProject.Path & "O.bmp"
    End If
End Sub
Ciao.
-Marco-
-- 


 -Marco-
Perfetto Marco!
Non senza difficoltà, ma ci sono riuscito. Starai ridendo, di fatto si
tratta di un copia ed incolla. Però non mi funzionava, pur mettendo le
immagini nella stessa directory usando il CurrentProject.Path, ma con la
dritta che mi avevi anticipato di metterci il Path, dopo aver capito come
scriverlo, intendo dire apici e slash: obbiettivo raggiunto. GRAZIE!!!
Permettimi un'ultima domanda se avrai tempo e possibilità di rispondere:
Dovendo utilizzare per questo scopo una sezione diversa del Report, per
esempio l'intestazione report, dove non trovo l'evento: stampa, la cosa è
possibile oppure no?
Grazie in ogni caso per la Tua disponibilità
Ciao a TUTTI Fabio

Fabio ha scritto:


Tutte le sezioni di un report hanno l'evento Stampa, anche quelle che puoi
personalizzare tu in "Ordinamento e raggruppamento".
Cerca nella finestra delle proprietà, scheda "Evento".


 -Marco-
Hai perfettamente RAGIONE, mi sono preso un abbaglio, perchè guardavo le
proprietà del REPORT, non della sezione, cavolina che figuraccia!!!
Ultimissima domanda: sulle maschere si può applicare questa tecnica?
Scusa l'insistenza.
GRAZIE ancora Fabio

Fabio ha scritto:


Sulle maschere singole (che visualizzano un solo record per volta)
sicuramente si.
Sulle continue no, perchè quando carichi l'immagine in uno dei controlli
la carica anche in tutti gli altri record.
Devi trovare qualche trucchetto, per esempio inserire nella maschera le
varie immagini possibili, ognuna in un suo controllo, sovrapporli e usare
la formattazione condizionale per rendere visibile solo quello che ti
serve.


 -Marco-
Bene, comincio da subito a provarci.
Grazie di TUTTO.
Ciao Fabio