i need help finding a fast way to load up lots of animation gif on form load , and then have them all loaded up into frame1 as image1(0) , image1(1) all the emotes when i click on it should show that gif on webbrowser.
its a winsock chat programme using webbrowser as chat window, currently i am using like this and it sucks big time,takes long time to add 1 after another ..
form load
in module
in frame1
has over 50 gif example
img_Smiley(0) , img_Smiley(1) ,img_Smiley(2) on and on till 50 and when i click it it shows the gif on webbrowser but takes long time to add them need a faster way.
text7 is the chat message window were we type room message.
smileys.text
i have to enter then 1 by 1 and i can tell u 1 thing it sucks dont mind my language i apologize need a faster way to load gif guys
its a winsock chat programme using webbrowser as chat window, currently i am using like this and it sucks big time,takes long time to add 1 after another ..
form load
Code:
Private Sub Form_Load()
Smiley(1) = ":) :-)"
Smiley(2) = ":-c"
Smiley(3) = ":( :-("
Smiley(4) = ":)]"
Smiley(5) = ";) ;-)"
Smiley(6) = "x( x-("
Smiley(7) = ":d :-d"
Smiley(8) = ":-h"
Smiley(9) = ";;)"
Smiley(10) = ":-t"
Smiley(11) = ">:d<"
Smiley(12) = "8->"
End Subin module
Code:
Public Smiley(1 To 199) As Stringin frame1
has over 50 gif example
img_Smiley(0) , img_Smiley(1) ,img_Smiley(2) on and on till 50 and when i click it it shows the gif on webbrowser but takes long time to add them need a faster way.
Code:
Private Sub img_Smiley_Click(Index As Integer)
On Error Resume Next
Dim strList() As String
Dim strSmiley() As String
Dim strSmileys As String
Dim X As Integer
''on error Resume Next
strSmileys = LoadTextFile(App.Path & "\Resources\Pictures\Smileys\Smileys.txt")
strList = Split(strSmileys, vbCrLf)
For X = 0 To UBound(strList) - 1
strSmiley = Split(strList(X), " ")
If LCase(strSmiley(0)) = "smiley" & (Index + 1) Then
'Process Send to Form
Text7.SelText = strSmiley(1)
SetFocus
Frame2.Visible = False
Exit For
End If
Next X
End Subsmileys.text
Code:
Smiley86 :-??
Smiley19 >:)
Smiley69 \:D/
Smiley20 :(( :-((
Smiley21 :)) :-))
Smiley1 :) :-)
Smiley71 ;))
Smiley2 :( :-(
Smiley6 >:D<
Smiley5 ;;)
Smiley3 ;) ;-)
Smiley7 :-/
Smiley8 :-X :X
Smiley4 :D :-D
Smiley9 :">
Smiley10 :P
Smiley11 :* :-*
Smiley12 =((
Smiley13 :O :-O
Smiley14 X( X-(
Smiley15 :> :->
Smiley16 B-)
Smiley17 :S :-S
Smiley18 #:-S
Smiley22 :| :-|
Smiley23 /:)
Smiley24 =))
Smiley25 O:-)
Smiley26 :-B
Smiley27 =;
Smiley28 I-) |-)
Smiley29 8-|
Smiley30 L-)
Smiley31 :-&
Smiley32 :-$
Smiley33 [-(
Smiley34 :O)
Smiley35 8-}
Smiley36 <:-P
Smiley37 (:|
Smiley38 =P~
Smiley39 :-?
Smiley40 #-O
Smiley41 =D>
Smiley42 :-SS
Smiley43 @-)
Smiley44 :^O
Smiley45 :-W
Smiley46 :< :-<
Smiley47 >:P
Smiley48 <):)
Smiley49 :@)
Smiley50 3:-O
Smiley51 :(|)
Smiley52 ~:>
Smiley53 @};-
Smiley54 %%-
Smiley55 **==
Smiley56 (~~)
Smiley57 ~O)
Smiley58 *-:)
Smiley59 8-X
Smiley60 =:)
Smiley61 >-)
Smiley62 :-L
Smiley63 [-O<
Smiley64 $-)
Smiley65 :-"
Smiley66 B-(
Smiley67 :)>-
Smiley68 [-X
Smiley70 >:/
Smiley72 O->
Smiley73 O=>
Smiley74 O-+
Smiley75 (%)
Smiley76 :-@
Smiley77 ^:)^
Smiley78 :-J
Smiley79 (*)
Smiley80 :)]
Smiley81 :-c
Smiley82 >:/
Smiley83 ~X(
Smiley84 :-H
Smiley85 8->
Smiley87 %-(
Smiley88 aaa@
Smiley89 ::}
Smiley90 @3#
Smiley91 W3%
Smiley92 @#@
Smiley93 @$@
Smiley94 @!!@
Smiley95 @!@@
Smiley96 @$#@
Smiley97 @K*@
Smiley98 @<@
Smiley99 @<<@
Smiley100 @>?@
Smiley101 ::a
Smiley102 ::S
Smiley103 ::H
Smiley104 ::W
Smiley105 ::R
Smiley106 ::T
Smiley107 ::Y
Smiley108 ::E
Smiley109 ::I
Smiley110 ::G
Smiley111 ::B
Smiley112 ::F
Smiley113 ::U
Smiley114 ::K
Smiley115 ::]
Smiley116 ::[
Smiley117 ::?