Scrivere testo su immagine – Codice VB.NET



Categoria dell'articolo: Codice VB.NET

Listati in codice Visual Basic.NET, elaborati o rielaborati e adattati da IngAC con la versione 2015. Funzioni e subroutine varie utili alla creazione di programmi.





Articolo pubblicato da:



Se trovi interessante l'articolo che ti stai accingendo a leggere, metti un mi piace e condividi! Be Social!



Come scrivere testo su immagine: una semplice funzione in codice VB.NET


Introduzione

Può capitare che in alcune parti del nostro programma occorra per qualche motivo scrivere testo su un’immagine. Ad esempio se stiamo implementando un elaboratore di immagini, oppure se vogliamo imprimere un “timbro” testuale, sapere come fare a scrivere testo su una immagine tramite vb.net è uno dei passi fondamentali. La funzione che ho implementato, girando qua e la sul web e rielaborando il tutto, che si occupa appunto di scrivere un testo su immagini è: IngAC_IMMAGINE_SCRIVI(ByVal Immagine As Bitmap, ByVal Testo As String, ByVal Testo_Colore As Brush, ByVal Testo_POS_X As Single,ByVal Testo_POS_Y As Single, ByVal Testo_Font_Name As String, ByVal Testo_Font_Size As UShort, Optional ByVal Testo_Font_Style As FontStyle = FontStyle.Regular) As Bitmap

Public Function IngAC_IMMAGINE_SCRIVI(ByVal Immagine As Bitmap,
                                     ByVal Testo As String,
                                     ByVal Testo_Colore As Brush,
                                     ByVal Testo_POS_X As Single,
                                     ByVal Testo_POS_Y As Single,
                                     ByVal Testo_Font_Name As String,
                                     ByVal Testo_Font_Size As UShort,
                                     Optional ByVal Testo_Font_Style As FontStyle = FontStyle.Regular) As Bitmap
Dim g As Graphics = Graphics.FromImage(Immagine)
Dim Font_personalizzata As New Font(Testo_Font_Name, Testo_Font_Size, Testo_Font_Style)
g.DrawString(Testo, Font_personalizzata, Testo_Colore, Testo_POS_X, Testo_POS_Y)
Return Immagine
End Function

 

La funzione per scrivere testo su immagine in VB.NET

La funzione IngAC_IMMAGINE_SCRIVI ha come input:

  • Immagine che è l’immagine orginale che può provenire sia da file che da picturebox o anche da altri oggetti image o bitmap;
  • Testo che è la stringa di testo che si vuole imprimere sull’immagine;
  • Testo_Colore che è il colore del pennello (si può utilizzare la classe brushes e mettere direttamente brushes.coloreX);
  • Testo_POS_X rappresenta la posizione orizzontale in pixel del testo;
  • Testo_POS_Y rappresenta la posizione verticale in pixel del testo;
  • Testo_Font_Name è il nome del font che si vuole usare, ad esempio “ARIAL” o “COURIER” etc
  • Testo_Font_Size è la grandezza del testo;
  • Testo_Font_Style rappresenta lo stile regolare, grassetto o corsivo del font.

In output si avrà un’immagine uguale all’originale ma con il testo inserito nella posizione desiderata.

Funzionamento di IngAC_IMMAGINE_SCRIVI()

Il funzionamento è semplicissimo; occorre innanzi tutto includere Imports System.Drawing.Imaging che permette di accedere alle funzionalità grafiche di vb.net e alle varie classi inerenti. Si crea una variabile Font_Personalizzata con raccolte tutte le caratteristiche del testo e infine la funzione g.DrawString si occupa del resto.

Link Utili:

Scrivere testo su immagine - Codice VB.NET

Scrivere testo su immagine – Codice VB.NET



Random Post

PREVISIONE LOTTO n° 75 di SABATO 23 GIUGNO 2018

Previsione Lotto 23 Giugno 2018

PREVISIONE LOTTO n° 75 di SABATO 23 GIUGNO 2018 Esito della previsione precedente: 1)NAPOLI: Niente; (AMBO MI); 2)TORINO: 1 euro 10eLotto; (AMBO RM). (1) In parentesi tonda, eventuali risultati rile...

Vai al post...

Crema di favette con asparagi – Ricette semplici

Crema di favette con asparagi - Ricette semplici

Crema di favette con asparagi – Ricette semplici. Ingredienti della crema di favette con asparagi: 800 g di favette (o fave, in alternativa) sgusciate; 1 grossa cipolla; 1 lattuga a cappuccio; 1...

Vai al post...

Come avviare un PC collegato in LAN

cavo lan

Come fare per avviare un PC collegato tramite LAN-Ethernet? Ormai quasi tutti abbiamo un paio di computer a casa collegati attraverso un cavo ethernet o un router. Molto spesso uno lo usiamo come prin...

Vai al post...

PUBBLICITÀ



Disclaimer:


Questo blog NON è un prodotto editoriale ai sensi della legge n° 62 del 7 marzo 2001. Le immagini tratte da internet che possano violare i diritti di autore, previa comunicazione, attraverso la sezione -contatti-, verranno prontamente rimosse o sostituite.

Copyright:


I contenuti presenti su ROMOLETTO BLOG dei quali è autore il proprietario del blog non possono essere copiati, riprodotti, redistribuiti perché appartenenti all autore stesso. Si vieta la copia e la riproduzione dei contenuti in qualsiasi modo o forma. Si vieta altresì la pubblicazione e la redistribuzione dei contenuti non autorizzata espressamente dell autore.


Copyright © 2011 / 2019 - ROMOLETTO BLOG - All Right Reserved

IngAC

Informazioni su Romoletto Blog

Ingegnere Civile, Blogger, Programmatore VB.NET, Lezioni private per scuole medie inferiori e superiori. Per contattarmi scorri la home fino in fondo e vai al form -Contatti-

Navigazione per Articoli della stessa Categoria