Click here to Skip to main content
16,007,885 members
Home / Discussions / Visual Basic
   

Visual Basic

 
QuestionVB6 : HOW TO LINK DATA BETWEEN 2 FORM Pin
steventry1-Feb-06 4:16
steventry1-Feb-06 4:16 
AnswerRe: VB6 : HOW TO LINK DATA BETWEEN 2 FORM Pin
militiaware1-Feb-06 4:28
militiaware1-Feb-06 4:28 
GeneralRe: VB6 : HOW TO LINK DATA BETWEEN 2 FORM Pin
Colin Angus Mackay1-Feb-06 5:54
Colin Angus Mackay1-Feb-06 5:54 
GeneralRe: VB6 : HOW TO LINK DATA BETWEEN 2 FORM Pin
Dave Kreskowiak1-Feb-06 6:02
mveDave Kreskowiak1-Feb-06 6:02 
GeneralRe: VB6 : HOW TO LINK DATA BETWEEN 2 FORM Pin
nata20061-Feb-06 22:59
nata20061-Feb-06 22:59 
GeneralRe: VB6 : HOW TO LINK DATA BETWEEN 2 FORM Pin
militiaware1-Feb-06 23:36
militiaware1-Feb-06 23:36 
QuestionTAPI & MSComm Control Pin
Nishanthbster31-Jan-06 23:35
Nishanthbster31-Jan-06 23:35 
QuestionWhy my image is not getting resized? the code is included Pin
JUNEYT31-Jan-06 23:09
JUNEYT31-Jan-06 23:09 
Hello! I have a picturebox1 and its sizemode is set to strechimage. So the actual image size is bigger than the picturebox1 size. My aim is to draw the image as big as picturebox1 size as streched to see all image not a part of the image. Somethig is wrong in the code below because it only draws the area (Picturebox1 size) of the image. I am not able to scale the image.

Any help!

Thanks!

BJ



Private Function DrawImageCallback(ByVal callBackData As IntPtr) As Boolean

'Test for call that passes callBackData parameter.

If callBackData.Equals(IntPtr.Zero) Then
' If no callBackData passed, abort DrawImage method.
Return True
Else
' If callBackData passed, continue DrawImage method.
Return False
End If

End Function



' Copy the watermark image over the result image.
Private Sub DrawWatermark(ByVal watermark_bm As Bitmap, _
ByVal result_bm As Bitmap, ByVal x As Integer, ByVal y As Integer)

Dim imageCallback As New Graphics.DrawImageAbort(AddressOf DrawImageCallback)
Dim imageCallbackData As New IntPtr(1)

' Create rectangle for adjusted image.
Dim destRect2 As New Rectangle(PictureBox1.Location.X, PictureBox1.Location.Y, PictureBox1.Width, PictureBox1.Height)
Dim es As Graphics = Graphics.FromImage(result_bm)

' Create image attributes and set large gamma.
Dim imageAttr As New ImageAttributes()

'imageAttr.SetGamma(4.0F)
' Draw adjusted image to screen.

' Draw adjusted image to screen.
es.DrawImage(watermark_bm, destRect2, PictureBox1.Location.X, PictureBox1.Location.Y, PictureBox1.Width, PictureBox1.Height, GraphicsUnit.Pixel, imageAttr, imageCallback, imageCallbackData)

imagination is the seed value of creation!
QuestionWhy my image is not getting resized? the code is included Pin
JUNEYT31-Jan-06 23:04
JUNEYT31-Jan-06 23:04 
QuestionHow am I to change the Regional Language Settings in VB.Net Pin
Ganesh Pradeep31-Jan-06 23:00
Ganesh Pradeep31-Jan-06 23:00 
Questionhow can i attch file to send without modem dial up in windows form? Pin
pantaloo31-Jan-06 21:09
pantaloo31-Jan-06 21:09 
AnswerRe: how can i attch file to send without modem dial up in windows form? Pin
malharone1-Feb-06 11:32
malharone1-Feb-06 11:32 
AnswerRe: how can i attch file to send without modem dial up in windows form? Pin
pantaloo1-Feb-06 23:10
pantaloo1-Feb-06 23:10 
QuestionRound Function Pin
PremalathaP31-Jan-06 19:18
PremalathaP31-Jan-06 19:18 
AnswerRe: Round Function Pin
Mekong River31-Jan-06 20:37
Mekong River31-Jan-06 20:37 
GeneralRe: Round Function Pin
PremalathaP31-Jan-06 21:34
PremalathaP31-Jan-06 21:34 
AnswerRe: Round Function Pin
Guffa31-Jan-06 21:58
Guffa31-Jan-06 21:58 
GeneralRe: Round Function Pin
PremalathaP31-Jan-06 22:48
PremalathaP31-Jan-06 22:48 
AnswerRe: Round Function Pin
Guffa1-Feb-06 0:40
Guffa1-Feb-06 0:40 
GeneralRe: Round Function Pin
PremalathaP1-Feb-06 0:44
PremalathaP1-Feb-06 0:44 
AnswerRe: Round Function Pin
Mekong River2-Feb-06 12:41
Mekong River2-Feb-06 12:41 
QuestionAviCap Pin
jasonpb31-Jan-06 18:10
jasonpb31-Jan-06 18:10 
AnswerRe: AviCap Pin
Mekong River31-Jan-06 20:48
Mekong River31-Jan-06 20:48 
QuestionRe: AviCap Pin
jasonpb31-Jan-06 21:02
jasonpb31-Jan-06 21:02 
AnswerRe: AviCap Pin
Mekong River3-Feb-06 5:29
Mekong River3-Feb-06 5:29 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.