B4A Library I introduce My Library ICOSLibrary

lonleystar

Well-Known Member

Licensed User

Longtime User

• Dec 29, 2012

• #41

Asmoro said:

Hi Lonleystar,

I use your great ICOSSlideAnimation library to testing out a bit.

Do you have a way to make slide in an infinite loop?

As an example I have a code:

B4X:

Sub Globals
   
        Dim cl As ICOSSlideAnimation
        Dim Clouds As ImageView
End Sub


Sub Activity_Create(FirstTime As Boolean)

         cl.SlideFromRightToLeft("cl",100,30000)   
    cl.StartAnim(Clouds)
End Sub

Grtz,
Asmoro

update: is cl.AutoRepeat enough?

Click to expand...

Hi Asmoro, ou should use AutoRepeat to set a infinite loop

Sub Globals
Dim cl As ICOSSlideAnimation
Dim Clouds As ImageView
End Sub


Sub Activity_Create(FirstTime As Boolean)

cl.SlideFromRightToLeft("cl",100,30000)

cl.AutoRepeat

cl.StartAnim(Clouds)

End Sub

I wish you a happy new year.


best regard

G.Salvi

 

A

Asmoro

Active Member

Licensed User

Longtime User

• Dec 30, 2012

• #42

Thanks Salvi,

It's working well and best wishes to you too.:sign0188:

 

A

Asmoro

Active Member

Licensed User

Longtime User

• Jan 14, 2013

• #43

AutoReverse

Hi Salvi,

I'm just wondering why AutoReverse doesn't work in your libraries.

For example with your code:

B4X:

Sub b4_Click
   a.ScaleToLeft("a",2000)
   a.StartAnim(i1)
   a.AutoReverse
End Sub

But AutoRepeat works...

grtz.
Asmoro

 

A

Asmoro

Active Member

Licensed User

Longtime User

• Apr 27, 2013

• #44

Image using Icosfade and Slideanimation at the same time

Hi Salvi,

Is there a way to handle these?

as an example I have a code in a Sub:

B4X:

   st.SlideToRight("st",1500,9000)
   st.StartAnim(Siren1)
   Siren1.Visible = True

   sr1.FadeInOut("sr1",1500)
   sr1.StartAnim(Siren1)
   sr1.AutoRepeat

Only one of the two are activated.

Hope you have a solution.

t.i.a.
Asmoro

 

lonleystar

Well-Known Member

Licensed User

Longtime User

• Apr 27, 2013

• #45

Hi Asmoro,

i´ll give a look tomorrow sorry if i dint answer fast.

 

H

hanslieb

Member

Licensed User

Longtime User

• May 26, 2013

• #46

Question to the ICOS Phone Lib

Hello,
i have downloaded the Lib today and first of all it is a very usefull Lib.

I only have one question to the GPS On/OFF function.

Would it be possible to turn off / on the GPS without the Questionbox?

for example

Dim icos As ICOSPhone
icos.Initialize

icos.GPSOnOff(False) 'false turns GPS Off / True turns GPS On

The reason why i ask is that i wnat to use that in a service modul und it should automaticly turn the gps off in a specific time range and then turn it on also automaticly after a pause mode.


Thanks in advance

 

H

hanslieb

Member

Licensed User

Longtime User

• May 26, 2013

• #47

Turn on off GPS

Found a Solution for this.
If someone wants to know here is the code:

Dim In As Intent
In.Initialize("android.location.GPS_ENABLED_CHANGE","")
In.PutExtra("enabled", True) ' turn GPS on / False turns it off


Dim p As Phone
p.SendBroadcastIntent(In)



happy coding

 

fotosettore

Member

Licensed User

Longtime User

• Jun 9, 2013

• #48

background in fade

hi Giuseppe
is it possible to change color of background in fadeanimation ?
i use this library to fade a panel, that is colordrawable white
when i fade it, become black.
i need it to be or White or chosen color of background
many thanks
peppe

 

lonleystar

Well-Known Member

Licensed User

Longtime User

• Jun 10, 2013

• #49

fotosettore said:

hi Giuseppe
is it possible to change color of background in fadeanimation ?
i use this library to fade a panel, that is colordrawable white
when i fade it, become black.
i need it to be or White or chosen color of background
many thanks
peppe

Click to expand...

Hi fotosettore,


I´ll give a look I think yes.

 

William Hunter

Active Member

Licensed User

Longtime User

• Aug 10, 2013

• #50

I have just discovered the ICOSLibrary and have been working with the author’s code example for ICOSPhone. I am getting this error: "java.lang.StringIndexOutOfBoundsException " at the line of code below. If I REM out the four lines of code referencing ph.Celsius, the app will run without error in the emulator.

There are also two variables that are not used – ss2 and a. Have there been modifications to this code, or to the ICOSPhone Library that are un-posted? Any help would be appreciated.

B4X:

ss.ProgressBarValue = ph.Celsius

 

lonleystar

Well-Known Member

Licensed User

Longtime User

• Aug 12, 2013

• #51

Hi William,

Sorry if I answer late Im fixing the library as soon as possible i´ll upload it.

 

H

holdemadvantage

Active Member

Licensed User

Longtime User

• Jan 2, 2014

• #52

Hi, i was trying

a.RotateCentre("a",90,2000)
a.StartAnim(i1)

but the image after animation is finished turn into beginning position. Is it possible to lock it to final position?

 

ilan

Expert

Licensed User

Longtime User

• Jan 24, 2014

• #53

WOW !!!!!!!!!!!!!!!!!!!!!!!!!

i dont understand how i could missed this greate lib??!!

 

GMan

Well-Known Member

Licensed User

Longtime User

• Jan 27, 2014

• #54

Hoi lonleystar,
with the texttospeech-part nothing is to hear.
Used that sample from the 1st post.

Playing around, the ReadandSPeakSMS feature works

Solved - i added speaking direct after the app starts - that does not work.
when i call a new / another activity it works (if set of course))

 

Last edited: Jan 27, 2014

imgsimonebiliato

Well-Known Member

Licensed User

Longtime User

• Feb 18, 2014

• #55

Really Great work!! Bravo!!

 

L

LéonE

Member

Licensed User

Longtime User

• May 30, 2014

• #56

new in b4a, so Sorry but i cant find the library "ICOSAnimation". it's not included anywhere.

the code Dim a As ICOSAnimation (your simple example does not work)
what have i missed.

is there somewhere a manual?

 

lonleystar

Well-Known Member

Licensed User

Longtime User

• May 30, 2014

• #57

Hi ICOSAnimation is not a lib.

if u check in the first post u see all library .zip or go here http://www.b4x.com/android/wiki/index.php/Libraries and find Developer: Giuseppe Salvi

 

L

LéonE

Member

Licensed User

Longtime User

• May 30, 2014

• #58

ho capito ma l'essempio non funziona e ho chiesto perche?

what i stated was: Dim a As ICOSAnimation (your simple example does not work)

why? what did i missed

 

lonleystar

Well-Known Member

Licensed User

Longtime User

• May 30, 2014

• #59

Ciao, ho capito che l'esempio non ti funziona. Ma dimmi devo lo trovi (ICOSAnimation) e tutto un insieme di librerie per l'animazione.

Hi, I understand that the example does not work to you. But tell me where you find it (ICOSAnimation) it is a set of library for animation.

 

L

LéonE

Member

Licensed User

Longtime User

• May 30, 2014

• #60

ho guardato un attimo meglio.
i essmpi sono i primi zip.
scusa ma non avvevo capito.

buon fine settimana.

sorry i hadn't open the other zipfiles. now i did and have seen the correct examples. sorry for that.
have a nice weekend