picture editor

[emongs]

can some one help me w/ codes in making picture editor. that allows the user to use the following:

Picture ToolBar
Color Picture
Color BackGround
Effects
Insert Text
Alignment of Picture
Resize

thanks for the help

[AndreRet]

What do you have so far? This is a lot of code, we need to see what you have already.

[emongs]

i already got cropping picture. but its hard to determine how to code them.

[AndreRet]

This part will add text into the picture box with some effects -

'©2001 by Alexander Anikin
'e-mail: [e-mail]
'for more my code samples
'visit my personal web site:
'http://www.hotmix.kiev.ua
Dim a As String
Dim b As Integer
Private Declare Sub Sleep _
Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Start()
Do
For b = 16 To 64 Step 4
Sleep 1
Cls
ForeColor = RGB(80 + b, 0, 0)
Font.Size = b
CurrentX = (ScaleWidth - TextWidth(a)) \ 2
CurrentY = (ScaleHeight - TextHeight(a)) \ 2
Print a
DoEvents
Next
For b = 64 To 16 Step -4
Sleep 1
Cls
ForeColor = RGB(155 + b, 0, 0)
Font.Size = b
CurrentX = (ScaleWidth - TextWidth(a)) \ 2
CurrentY = (ScaleHeight - TextHeight(a)) \ 2
Print a
DoEvents
Next
DoEvents
Loop
End Sub

Private Sub Form_Activate()
Call Start

End Sub

Private Sub Form_Load()
Caption = "for more code samles - http://www.hotmix.kiev.ua"
BackColor = vbBlack
WindowState = vbNormal
AutoRedraw = True
Width = 6075
Height = 4725
Font.Name = "arial"

a = "cooLLook"

End Sub

Private Sub Form_Unload(Cancel As Integer)
End
End Sub

The attached file handles shadows, colour picker etc.

This is about as much as I can help you.:)

If you need more info, please open a new post with a SPECIFIC subject and not an entire project, thanks.

If these helped, please close this thread by marking it as solved, thanks.

[emongs]

wow thanks so much

[AndreRet]

Only a pleasure.:)

Season Greetings and blessings.