Newsgroup: it.comp.lang.delphi
Titolo: FileListBox

Un saluto a tutti e un ciao a Jax, ti ricordi di me?
parlavamo di disfunzioni riguardo alla TFileListBox.
Ebbene, avevi pienamente ragione tu, i problemi cominciano a farsi 
vedere.
Posso chiedere? Spero di si. Io ci provo:
Ho un FileListBox che mi fa vedere tutti i file .rtf che ho in una 
specifica cartella,e cliccando su ognuno di essi me li apre. Fin qui 
tutto bene, ma, avrei bisogno di associarli (ogni testo ad un file 
Jpeg),quindi cliccando su ogni nome file, non solo mi deve aprire quello
(.rtf), ma anche uno di estensione .Jpeg. NON SO COME FARE mi aiutate?
Grazie a tutti.
Ciao.
--- posted by geoForum on 
http://www.delphiedintorni.it

 (.rtf), ma anche uno di estensione .Jpeg. NON SO COME FARE mi aiutate?
Premetto che, a causa del tuo metodo "strano" di accedere alla 
FileListBox, il codice potrebbe non funzionare...
1) aggiungi nelle uses (in cima alla tua unit) la unit "Jpeg", 
altrimenti non ti caricherà le jpg
2) aggiungi un componente TImage alla form
3) quando carichi l'rtf nella memo, carica il jpg nel TImage con
Image1.Picture.LoadFromFile(StringReplace(FileListBox1.FileName, '.rtf', 
'.jpg', [rfIgnoreCase]));
-- 
Jax

Grazie Jax, mi fa piacere che ti sei ricordato, il codice funziona, ma 
il testo diventa illegibile.
Qualche idea?
Grazie di nuovo.


Anzi  no, scusa non mi sono accorto che ora nel FileListBox si leggono i 
due nomi dello stesso file uno .rtf e l'altro .jpeg.
Si va tutto bene, però vorrei solo un nome se è possibile, altrimenti 
vado con un'altra soluzione.


 vado con un'altra soluzione.
Scusa ma non avevi messo una mask? Se ci metti Mask := '*.rtf' vedrai 
ovviamente solo gli rtf.
-- 
Jax


Si è vero scusa, avevo lasciato *.*, ora ho messo *.rtf e vedo solo 
quelli, ma se ci clicco sopra mi da l'errore:
"Unknown picture file extension(.rtf)"
Scusa se ti stresso.


Mi dice che non trova il file .jpeg, ma il percorso dove lo cerca è 
giusto, e poi ho messo i file di testo e quelli grafici nella stessa 
cartella.
Sto impazzendo.
Aiutami ti prego.
grazie.


 Sto impazzendo.
Senti, non andiamo da nessuna parte così.
Mandami sto progetto, garetjax76 at yahoo punto it
-- 
Jax


Ciao jax, spero ti accorga ti questo, per evitarti lavoro inutile,
ti ho spedito il progetto, perň ho risolto.
Grazie tante, ciao.


 ti ho spedito il progetto, però ho risolto.
Ho dato comunque uno sguardo al tuo codice (era meglio se mi mandavi 
anche il dfm, così mi devo "immaginare" la form...).
Adesso ho capito perché hai così tante difficoltà... sei più che alle 
prime armi. Ti voglio comunque dare due consigli...
1) perché nell'OnCreate della form hai messo un begin ad ogni istruzione?
2) fai un ciclo for per contare gli elementi della filelistbox, quando 
hai a disposizione (e usi) la proprietà Count!
3) leggiti un libro, uno qualsiasi, su Delphi, imparerai molte cose.
-- 
Jax

Ok, studierò, ma sinceramete, sono davvero cosi messo male?
In effeti mi rendo conto di fare delle stupidagini dettate anche dalla 
fretta.
Cmq ho 3 libri di delphi ti dico i titoli:
1)delphi 4
2)delphi 5 di marco cantu
3)la grande guida di delphi 2006 marco cantu
credo che delphi 4 sia + facile da capire gli altri 2 non riesco a 
digerirli.
Vorrei sapere devo studiare solo ed esclusivamente il delphi  oppure 
qualche altra cosa?
qualsiasi consiglio e sempre ben voluto.
grazie di tutto e scusa si ti ho rotto un po.
Ciao.


 grazie di tutto e scusa si ti ho rotto un po.
Siamo qui apposta... ;)
-- 
Jax