Autore Topic: Estrarre il valore per ognuno dei canali rosso, verde e blu di un pixel  (Letto 720 volte)

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.724
  • Ne mors quidem nos iunget
    • Mostra profilo
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »

Offline Gianluigi

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 4.244
  • Tonno verde
    • Mostra profilo
Forse non ho capito bene le risposte, ma credo che lui volesse ottenere il valore degli interi RGB dei singoli colori e questi si possono ottenere da (vedi progetto allegato):
Codice: [Seleziona]
  iColor = PictureBox1.Picture.Image[x, y]
  Print "Colore del pixel corrente = "; iColor
  Print "Parte rossa  = "; Color[iColor].Red
  Print "Parte verde = "; Color[iColor].Green
  Print "Parte blu = "; Color[iColor].Blue

Ho trovato la lezione da cui ho estratto il codice, eccola qui!

 :ciao: :ciao:
« Ultima modifica: 17 Marzo 2018, 23:12:26 da Gianluigi »
nuoto in attesa del bacio di una principessa che mi trasformi in un gambero azzurro

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.724
  • Ne mors quidem nos iunget
    • Mostra profilo
Molto bene, gliel'ho comunicato.
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »