Bottoni dalla cartella

[Silvio]

avendo una cartella ad esempio Usr vorrei far costruire al programma tanti bottoni quanti sono i file immagine contenute nella cartella.
Qualche esempio ?

grazie

[Enrico Maria Giordano]

Qualcosa tipo

Code: Select all  Expand view

aDir = DIRECTORY( "*.bmp" )

FOR i = 1 TO LEN( aDir )
    @ riga + i, colonna BTNBMP FILE aDir[ i, F_NAME ]
NEXT

EMG

[Silvio]

questo lo sapevo e l'avevo già impiantato senza aver successo.

scusa ma forse mi sono spiegato male: hai ragione!!
io non posso usare BMP ma PNG o addirittura JPG o GIF
cioè immagini ad alte risoluzioni.

Quali classi tipo button supportano tali immagini ?

[Enrico Maria Giordano]

Nessuna, che io sappia. Ti conviene convertire le immagini in BMP.

EMG

[Silvio]

ma mi era stato detto che Linares aveva fatto qualcosa usando i Png o sbaglio ?

[Enrico Maria Giordano]

La classe TImage, grazie alla libreria FreeImage, è in grado di caricare i file PNG ma nessuna classe button usa attualmente la classe TImage o la libreria FreeImage, che io sappia.

EMG

[Silvio]

dall'aggiornamento di Maggio :

New: Added high resolution icons and bitmaps (as PNGs).

a che cosa si riferisce ?

[Enrico Maria Giordano]

Al fatto che nella cartella BITMAPS è stata aggiunta una sottocartella HIRES contenente delle immagini PNG.

EMG

[Silvio]

ok mi sono illuso
pazienza

[Enrico Maria Giordano]

Comunque potresti ereditare una classe tua dalla TBtnBmp e farle utilizzare la FreeImage per caricare le PNG.

EMG

[Silvio]

si ci stavo pensando già... però forse ho trovato in Vtaskbar supporta i jpg e png