sábado, 26 de abril de 2014

Balloon

Balloon ( Message AS String, Control AS Control [ , Icon AS Picture, X AS Integer, Y AS Integer ] )

Message AS String: un texto cualquiera entre comillas:  "hola soy postapase" o en una variable string  previamente declarada


Control AS Control: aquí indicamos en que control tiene que aparecer, puede ser el mismo control u otro


Icon AS Picture: una imagen puede ser una  variable de tipo picture antes declarada o como se ve en el ejemplo de este post.


X AS Integer: coordenadas x dentro del control donde sale el balloon, se pueden poner números o variables númericas


Y AS Integer : coordenadas y dentro del control donde sale el balloon se pueden poner números o variables númericas



' Gambas class file


Public Sub _new()

End

Public Sub Form_Open()

End

Public Sub Button1_Click()
  TextArea1.Clear
  Balloon("hola amigos como estan?soy Button1", Button1)
  TextArea1.Text = File.Load("Text1")
End

Public Sub Button2_Click()
  TextArea1.Clear
  Balloon("hola amigos como estan?soy Button2", Button2,, 20, 15)
  TextArea1.Text = File.Load("Text2")
End

Public Sub Button3_Click()
  TextArea1.Clear
  Balloon("hola amigos como estan?soy Button3", Button3, Picture["logo-32.png"], 550, 10)
  TextArea1.Text = File.Load("Text3")
End

Public Sub Button4_Click()
  TextArea1.Clear
  Balloon("hola amigos como estan?\nsoy Button4\neste es el código fuente para que yo pueda salir así!", TextArea1, Picture["logo-32.png"], 200, 100)
  TextArea1.Text = File.Load("Text4")
End



Código fuente: Ballon-0.0.1.tar.gz

No hay comentarios.:

Publicar un comentario