Newsgroup: it.comp.appl.access
Titolo: Come cambiare il font di centinaia di campi in molte maschere?

Salve a voi del NG.
Il problema... eh...
Ho un "databasone" moooltro grosso, di moooolti MB (ma non
 vi dico quanti, perchè pensereste male ;-P) fatto con A97 ed
 convertito/utilizzato/ampliato senza problemi su A00...A03...
Volendo passare ad A07 son andato da un collega/amico per provare
 le differenze con il mio A03.
Alla prima cosa che ho notato m'è scappata una "parolaccia" ;-)
Mi ritrovo con uno dei problemi più antichi dei PC... ^_^
Ho delle caselle in varie (molte) form (per voi pure troppe ;-P)
Dove anziché comparire il font "MS Sans Serif" (sseriff.fon)
 appare un'altro carattere di cui non si sa il nome ;-/...
La cosa "A must" sarebbe di utilizzare a sto punto il font
 SanSerif TTF (sanss___.ttf)...
Ma qui c'è il problema... che fare?:
1) Nonostante nella cartella dei font di windows siano presenti
     ambedue i font (come files), perchè Acc07 non vede il
     "vecchio font" sseriff.fon (vuole solo i TrueTypeFont?)
     Se si, come farglieli vedere, se si può?
2) Cambiare in tutte le form in cui è stato utilizzato il font FON
    (non in tutti i campi, ma solo in alcuni), con font TTF...
    si, ma come farlo in automatico a migliaia di campi e solo a quelli
     che usavano questo font?  ;-/
3) Tenermi l'A03 risparmiando un po' di soldi, visto che già
      sfrutterò al massimo al 5% le potenzialità di questo Office03? ^_^
-- 
A.GiovanniB. 

 convertito/utilizzato/ampliato senza problemi su A00...A03...
Allora, prima canti sulla dimensione del db, poi ti si aiuta
RobertoA

      sfrutterò al massimo al 5% le potenzialità di questo Office03? ^_^
E soprattutto e' un ambiente maggiormente testato e, mi sembra, attualmente 
piu' stabile del 2007
Ciao
RobertoA

 Allora, prima canti sulla dimensione del db, poi ti si aiuta
^_^
Tempo fa mi avevate (non mi ricordo chi) "perculato" ;-P
Diciamo che "passa il quintale" di mb di cui circa
 15mb di dati (tabelle)
 6 mb di foto (bmp non collegate al programma d'origine)
 resto... query/form ed uno sputo di codice (a livelli scolastici ^_^)
-- 
A.GiovanniB. 

 resto... query/form ed uno sputo di codice (a livelli scolastici ^_^)
80 mega di query / form / report ?
Ma quante sono, 20.000 ?
Ciao
RobertoA

RobertoA ha scritto:

No, una query sola fatta cosi'
select * from tab where id=1
union
select * from tab where id=2
......
union
select * from tab where id=999999
--
ac

 ha scritto nel messaggio 
news:_lnLk.40994$Uo5....@tornado.fastwebnet.it...
Lo sapevo che non dovevo dire la dimensione del DB ;-P
Il problema "è vasto", cioè:
1) Il "programmone" è una conversione a mano (fatta da me) di un
   databasone simile, fatto in Approach... una dozzina d'anni fa
   E qui mesi di "ricostruzione" in access ed ampliamenti...
2) Buona parte degli spostamenti tra le forms avviene con macro...
    che man mano converto in codice...
3) Poichè capita di usare più dei 256 campi assieme, alcuni dati vengono
     attualmente ricopiati 2-3 volte in altre tabelle... anzicchè 
richiamarli ;-/
4) Ci han messo mano: io una dozzina di anni fa con conoscenze di VB
     mooolto scarse... ci mette mano il babbo che lavora solo sulle maschere
     il resto buio...
5) Devo lavorare e così funziona... ;-P
    Pian piano lo sistemo (implementando codice e trasformando le macro...),
     ma è un lavoro merdoso e lungo...
    Praticamente devo rifarlo tutto, ma non ho 2 mesi di fila da dedicargli 
^_^
6) da 100mb dovrei ridurlo di un 35-40% max usando codice... mahhhh...
     sicuramente non sarà meno di 50-60mb ;-)
7) Ho fatto 1 corso base in VBA, per sapere almeno +o- che lingua parla ;-P
In conclusione, FORSE faccio quindi a tempo a sposarmi, procreare ed
 andare in pensione... ma con calma lo sistemo ;-D
-- 
A.GiovanniB. 

 
mah bah boh...
hai provato a fargli l'inganno della cadrega e a rinominare il font TTF nel 
nome di quello FON (rimozione+reinstallazione)?
magari funziona anche... io non ci provo sul mio databasone :P
-- 
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\

 ac
Simpaticissima osservazione... ho riso almeno 2 secondi di fila... ed
in questo periodo direi che è ottimo.
@Alex

 /-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
Speriamo che nessuno la prenda seriamente questa cosa...
@Alex


La cosa mi alletta... perchè ripenso ai vecchi sviluppatori, sempre
definiti retrogradi e non avvezzi all'abbellimento grafico, che
dicevano che gli unici Font da usare erano:
Thaoma/Verdana/Currier
Ora loro non avrebbero questi problemi...!
Direi che ti armerai di pazienza e cambierai tutti i FontType... o a
mano oppure aprendo da codice in modalità Design tutte le Form e ti
ciclerai tutti i Controlli che espongono la proprietà FontType e la
cambierai salvando le modifiche uscendo in chiusura.
Rifletti però sull'errore iniziale.
@Alex

 Rifletti però sull'errore iniziale.
Quale? :-/
Quello del font? ;-P
-- 
A.GiovanniB. 

Alessandro Baraldi ha scritto:

ehehehehehehehe......siamo qui per servire ;<)
--
ac

 e poi facendo pure un blocco al loop che altrimenti sarebbe infinito ;-P
Si
In effetti la routine fa anche da burn-in test per testare la dissipazione 
termica di cpu e scheda madre
Piuttosto, per darti una mano a 'smagrire' il databasone, ti consiglierei di 
esportare tutto in formato testo, report, form, codice, query, ...
Cosi, ordinando i singoli file per dimensione, vedi subito quelli piu' 
ciccioni e puoi intervenire sul famoso 20% che ingigantisce per l'80% il 
programma
Oppure sul 10% che ingigantisce il 90% del programma
Oppure sul 15% che ingigantisce l' 85% del programma
Oppure sul 30% che ingigantisce il 70% del programma
Oppure sul 18% che ingigantisce il 22% del programma
Oppure sul 24% che ingigantisce il 76% del programma
..................
.................

 programma
Ciapa ki
------------------------------------------------------
If Len(Dir(Application.CurrentProject.Path & 
"\PROGETTO_ESPORTATO_IN_FORMATO_TESTO", vbDirectory)) < 1 Then
    MkDir Application.CurrentProject.Path & 
"\PROGETTO_ESPORTATO_IN_FORMATO_TESTO"
    End If
Set dbs = CurrentDb()
Set cnt = dbs.Containers("Forms")   ' oppure Reports  oppure Query ecc..
For Each doc In cnt.Documents
    Application.SaveAsText acForm (oppure acReport oppure acQuery, ...), 
doc.Name, Application.CurrentProject.Path & 
"\PROGETTO_ESPORTATO_IN_FORMATO_TESTO\" & doc.Name & ".txt"
    Next doc
------------------------------------------------------
RobertoA

 termica di cpu e scheda madre
Il PC manco se n'è anccorto del loop infinito ;-)
Ho un Q9450... :-)
Che sta praticamente quasi sempre in auto down-clock/risparmio energetico 
;-P
Ho pure downcloccato (solo in uso lavorativo) la scheda video 9800GTX ;-P
Per il "convert" vedrò con calma, quando ho tempo ^_^
Tnk per l'aiuto
-- 
A.GiovanniB.