Ciao Fabrizio,
Alle 23:19, mercoledì 19 ottobre 2005, fabrizio venerandi ha scritto:
> non capisco come inserire un url preso con il controllo 'scegli file'
> all'interno di un record di testo.
Il controllo "scegli file" o file-picker non è un controllo "data-aware", cioè
non dispone delle proprietà tipiche dei controlli collegati ai dati, quindi
occorrerebbe gestire la faccenda con un po di codice, presumibilimente con un
paio di routine,
- una per leggere il valore dal db e passarlo al controllo,
- e un'altra per leggere il valore dal controllo e passrlo al db,
collegate rispettivamente agli eventi:
1) "dopo il cambio di record di dati"
2) "prima del cambio del record di dati"
Tuttavia questo sistema non è il più semplice e nemmeno il più flessibile amio
avviso.
La mia proposta è la seguente:
- non useremo il controllo file picker ma un normale controllo di testo
collegato ai dati. Questo riduce moltissimo la codifica.
- molto furbescamente :-) useremo un paio di utili funzioni già pronte che si
trovano nella libreria "Tools"
Questo ridurrà ancora di più la codifica.
A questo punto, a forza di ridurre sono rimaste solo 5 righe di codice da
scrivere :-)
-------------------
REM ***** BASIC *****
Sub BtnFilePicker_click()
GlobalScope.BasicLibraries.LoadLibrary("Tools")
TxtFilePath = getControlModel(ThisComponent, "FilePath")
Dim Filters(0,1) As String
Filters(0,0) = "File di testo" 'descrizione
Filters(0,1) = "*.txt" 'filtro
GetFileName(TxtFilePath, Filters())
End Sub
-------------------
Copiare la macro in un modulo all'interno della libreria Standard del
formulario (ad esempio)
Ora procediamo con ordine:
Inserire nel formulario un controllo di testo ("Campo di testo") e collegarlo
opportunamente al campo di database.
Nelle proprietà del controllo testo andremo a inserire i segg. valori:
Nome = TxtFilePath
Sola Lettura= Si
Ora, per completare la faccenda, inserire un pulsante vicino al campo di testo
Posizionare e dimensionare il pulsante in modo che l'insieme assomigli ad un
FilePicker
Nelle scheda proprietà del pulsante andremo ad inserire:
Nome = BtnFilePicker
Titolo = ...
Nella scheda eventi del pulsante invece:
collegare l'evento "Durante l'esecuzione" del pulsante con la macro
precedentemente copiata.
--fine
( Il procedimento è valido sia in OOo1.1.x che in OOo2 )
saluti
Paolo M
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
