Newsgroup: it.comp.lang.visual-basic
Titolo: attaccare pezzi di immagine

ciao a tutti,
ho un piccolo problemino....
spero in qualche miracolo qui su questo newsgroup....
:-)
ho una immagine divisa in pezzi quadrati,
(una specie di puzzle, immaginiamo divisa in 4 quadrati uguali per esempio)
vorrei trovare il modo di "unire" questi 4 quadrati e ottenere l'immagine
intera?
follia pura ?
...ripeto...spero nel miracolo.
:-)
ciao e buon lavoro a tutti voi !
--

 follia pura ?
Potresti usare PaintPicture per disegnare su una picturebox un pezzo da te
scelto, e per trovare la combinazione giusta fare tutte le combinazioni
possibili, trattando la matrice di *pezzetti* come un array
monodimensionale.
--
"Uno 0 incontra un 8 e gli dice: VUOI TOGLIERTI QUELLA CAXXO DI CINTA CHE
SEI RIDICOLO???"
(Io)

 wrote in message
news:i3wr9.42099$%M1.10...@twister2.libero.it...


 di generare un file unico da questi 4 (o piu') pezzi.
Appunto, la risposta di Vegeta fa quello che dici tu, a
prescindere dal "trovare le combinazioni giuste".
Se hai le 4 bitmap per esempio in 4 PictureBox, ne usi un'altra
e su questa copi, con PaintPicture, le altre quattro nelle zone
giuste. Poi salvi il risultato.
Bye, G.

 e su questa copi, con PaintPicture,
bitblt ?
ciao, a.


 bitblt ?
PaintPicture è un wrapper (un po' più lento) VB per la BitBlt, diceva
qualcuno, mentre io pensavo lo fosse della StretchBlt. Comunque
sia, se uno non ha esigenze estreme di velocità, chi glie lo fa fare
a incasinarsi con le API, quando c'è già una funzione VB che lo fa ?
Bye, G.

Avevo postato l'altro giorno questo a uno che chiedeva una immagige a
forma
di quadro, Ti da un po' l'idea di come realizzare:
Dim Quadro As String
Dim Immagine As String
Quadro = "C:\Documents and
Settings\Administrator\Documenti\Immagini\venere.bmp"
Immagine = "C:\Documents and
Settings\Administrator\Documenti\Immagini\email.gif"
Picture2.Picture = LoadPicture(Immagine)
Picture1.Picture = LoadPicture(Quadro)
Picture1.PaintPicture Picture2, 20, 20, Picture1.Width - 40,
Picture1.Height - 40
Picture1.Picture = Picture1.Image
SavePicture Picture1.Picture, "C:\Documents and
Settings\Administrator\Documenti\Immagini\Test.bmp"
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

vista la funzione...
mi gestisce solo bmp jpg o gif.
nel mio caso "purtroppo"
i file sono sgi o tiff,
entrambi con canale alpha.
e possono essere anche di notevoli dimensioni sia in pixel,
sia in mega.
altri suggerimenti ?
"Paperino" <non...@lo.dico> wrote in message
news:aombki$3d2m$1...@stargate1.inet.it...


 a incasinarsi con le API, quando c'è già una funzione VB che lo fa ?
sintassi:
oggetto.PaintPicture immagine, x1, y1, larghezza1, altezza1, x2, y2,
larghezza2, altezza2, codiceop
se guardi su allapi la sintassi di bitblt, io che sono negato mi ci
ero trovato abbastanza tranquillo. e fai parecchio prima, specie se le
immagini sono piu' di 10px per lato :)
ciao, a.
se ci sono errori e' colpa di oe che anche nel sformato olo txt
incolla dalla guida il txt formattato -- e lo mantiene fino alla fine
del post. sto scrivendo in corsivo e mi sta venendo il mal di mare.

 altri suggerimenti ?
Guarda il 3ad sui file TGA, l'ultimo post in particolare, non so se ti aiuta.
Credo che il problema peggiore sia il canale alpha, non mi pare che
la PictureBox possa gestirlo, quindi con VB puro non ci fai niente.
Spero di essere smentito, ma o smanetti di brutto con le API, e qui
non ti posso aiutare, o cerchi un OCX che lo gestisce.
Bye, G.