Esta biblioteca foi desenvolvida em b4a.
Biblioteca, que mostra uma janela de opções.
Fácil de usar, fácil de configurar e muito flexível.
com linhas linhas vc abre uma janela com um simples Array ou List ou até mesmo um Map.
RoldanWindowChoice
Autor: Eduardo Roldan
Versão: 1.22
RoldanWindowChoice
Biblioteca, que mostra uma janela de opções.
Fácil de usar, fácil de configurar e muito flexível.
com linhas linhas vc abre uma janela com um simples Array ou List ou até mesmo um Map.
RoldanWindowChoice
Autor: Eduardo Roldan
Versão: 1.22
RoldanWindowChoice
- Funções:
- Class_Globals As String
- Initialize (ME_CallBack As Object, TitleBar As String, Itens_Choice As Object)
Objetivo: Inicializa o objeto.
'-> ME_CallBack = onde você retornará a ligação
' -> TitleBar = Título da janela
'-> Itens_Choice = Mapa / Matriz / Lista com uma escolha de gráfico, Nota: As opções não podem ser repetidas
[CODE lang = "b4x" destaque = "Este exemplo abre uma janela com 3 opções com um Mapa e inconsistências nos botões"] Dim Map As Map: Map.InitializeMap.put ("Escolha 1", "Balanca.Png")
Map.put ("Escolha 2", "Carga.Png")
Map.put ("Escolha 3", "Chegou.Png")
Dim RoldanWindowChoice As RoldanWindowChoice
RoldanWindowChoice.Initialize (Me, "Choose a Map",
Aguarde Close_RoldanWindowChoice (Return As String) [/ CODE]
- Set_TransparentEdgeWidth (New_WidthEdge As Double)
Objetivo: Informar a largura da borda transparente da janela (quanto maior essa borda, menor a janela)
[CODE = b4x] RoldanWindowChoice.Set_TransparentEdgeWidth [/ CODE]
- isVisible As Boolean
Testa se o objeto é visível
[CODE = b4x] se RoldanWindowChoice.isVisible então [/ CODE]
- Mostrar
objetivo: este comando mostra a janela após configurar
[CODE = b4x] RoldanWindowChoice.Show [/ CODE]
- Set_HeightBar (New_Height_Bar As Double)
Objetivo: Informar a Altura da barra de título da janela.
NOTA: Não é obrigatório, caso não informe mostra que o padrão é 7% x
[CODE = b4x] RoldanWindowChoice.Set_TransparentEdgeWidth (10% x) [/ CODE]
- ColorFontTitleBar
Objetivo: Obter ou definir cores da barra de fontes das janelas.
NOTA: Não é obrigatório, se você não inserir, a cor padrão será preto
[CODE = b4x] 'Get ColorsxColor = RoldanWindowChoice.getColorFontTitleBar
' Definir cores
RoldanWindowChoice.getColorFontTitleBar = Colors.Red
[/ CODE]
- Set_ColorOrImageNameBar (Color_Or_Image_Name_Bar As String)
Objetivo: Definir a cor ou o nome de uma imagem para a barra da janela.
NOTA: Não é obrigatório, se você não inserir, a cor padrão será verde claro
[CODE = b4x] RoldanWindowChoice.Set_ColorOrImageNameBar (Colors.Blue)
'ou
RoldanWindowChoice.Set_ColorOrImageNameBar ("fundo.png")
[/ CODE]
- Set_ColorOrNameOfImageBackground (New_Color_or_Name_Of_Image_For_The_Window_Background As String)
Objetivo: Definir a cor ou o nome da imagem para o fundo da janela
NOTA: Não obrigatório, se você não entrar, a cor padrão será branco
[CODE = b4x] RoldanWindowChoice.Set_ColorOrNameOfImageBackground (colors.Blue)
'ou
RoldanWindowChoice.Set_ColorOrNameOfImageBackground ("fundo.png")
[/ CODE]
- Set_ColorOrNameOfImageBackgroundButton (New_Color_Or_Name_Of_Image_Background_Button As String)
Objetivo: Definir a cor ou o nome da imagem do botão de fundo da imagem
NOTA: Não obrigatório, se você não inserir, a cor padrão será verde
[CODE = b4x] RoldanWindowChoice.Set_ColorOrNameBlueBack) (colors)
RoldanWindowChoice.Set_ColorOrNameOfImageBackgroundButton ("fundo.png")
[/ CODE]
- ColorFontButtons
Obter ou definir a cor da fonte dos botões
NOTA: Não é obrigatório, se você não inserir, a cor padrão será verde
[CODE = b4x] 'o Get
xColor = RoldanWindowChoice.ColorFontButtons
' o Definir
RoldanWindowChoice.ColorFontButtons = colors.Blue
[/ CÓDIGO]
- ColorEdge
Get or Set Edge Color
NOTA: Não é obrigatório, se não informar mostra que o default é Blue
[CODE = b4x] 'Get Colors
xColor = RoldanWindowChoice.ColorEdge
' Set Colors
RoldanWindowChoice.ColorEdge = Colors.Magenta
[/ CODE]
- TitleBarTextSize
Obtém ou define o tamanho do texto da Barra de Título
NOTA: Não é obrigatório, se não informar mostra o padrão
[CODE = b4x] 'Get
xtextSize = RoldanWindowChoice.TitleBarTextSize
' Set
RoldanWindowChoice.TitleBarTextSize = 10
[/ CODE]
- ButtonTextSize
Get ou Set Button Text Size
NOTA: Não é obrigatório, se você não informar mostra o default
[CODE = b4x] 'the Get
xtextSize = RoldanWindowChoice.ButtonTextSize
' the Set
RoldanWindowChoice.ButtonTextSize = 10
[/ CODE]
- Ocultar
Ocultar a janela RoldanWindowChoice
[CODE = b4x] RoldanWindowChoice.Hide [/ CODE]
- Eventos
- Btn_Click (ViewTag As Object) As String
Ocorre quando é clicado um botão
Nota: Não precisa pois da pra tratar tudo com o Wait For Close_RoldanWindowChoice (Retorno As String)
- Btn_Cancel_RoldanWindowChoice_Click
Ocorre quando RoldanWindowChoice é cancelado o Retorno = "Quit"
Nota: Não precisa pois da pra tratar tudo com o Wait For Close_RoldanWindowChoice (Retorno As String)
- Close_RoldanWindowChoice
Ocorre quando RoldanWindowChoice é fechado Retorno = "Quit"
Nota: Não precisa pois da pra tratar tudo com o Wait For Close_RoldanWindowChoice (Retorno As String)
- RoldanWindowChoice_Show Ocorre quando RoldanWindowChoice é precioso
https://www.paypal.com/donate/?business=9V3YT8MKKXV9C&no_recurring=0¤cy_code=BRL&Z3JncnB0=
- Btn_Click (ViewTag As Object) As String
Attachments
Last edited: