VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



A1 Gradient Form and Picture with Gradient and Emboss Text

by Lutfur Rahman Bhuiyan (7 Submissions)
Category: Graphics
Compatability: VB Script
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: (4 Votes)

A perfect Gradient Form and Picture with Emboss and Gradient Text Effect. Enter your text with a text box than save it a Bitmap file format.

Assumes
A perfect Gradient Form and Picture with Emboss and Gradient Text Effect. Enter your text with a text box than save it a Bitmap file format.
Code Returns
Graphics
API Declarations
Private Declare Function CreateFontIndirect Lib "gdi32" Alias _
"CreateFontIndirectA" (lpLogFont As LOGFONT) As Long
Private Type LOGFONT
lfHeight As Long
lfWidth As Long
lfEscapement As Long
lfOrientation As Long
lfWeight As Long
lfItalic As Byte
lfUnderline As Byte
lfStrikeOut As Byte
lfCharSet As Byte
lfOutPrecision As Byte
lfClipPrecision As Byte
lfQuality As Byte
lfPitchAndFamily As Byte
lfFaceName As String * 33
End Type
Private Declare Function SelectObject Lib "gdi32" (ByVal hdc As Long, _
ByVal hObject As Long) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
Private Declare Function SetGraphicsMode Lib "gdi32" (ByVal hdc As Long, ByVal iMode As Long) As Long
Const GM_ADVANCED = 2

Rate A1 Gradient Form and Picture with Gradient and Emboss Text

Download A1 Gradient Form and Picture with Gradient and Emboss Text

Download A1 Gradient Form and Picture with Gradient and Emboss Text (4 KB)

A1 Gradient Form and Picture with Gradient and Emboss Text Comments

No comments have been posted about A1 Gradient Form and Picture with Gradient and Emboss Text. Why not be the first to post a comment about A1 Gradient Form and Picture with Gradient and Emboss Text.

Post your comment

Subject:
Message:
0/1000 characters