package estudosjavafx;
 
import javafx.application.Application;
import javafx.geometry.Insets;
import javafx.scene.Scene;
import javafx.scene.control.Button;
import javafx.scene.layout.HBox;
import javafx.stage.Stage;
 
public class EstudosJavaFX extends Application {
  public static void main(String[] args){
    launch(args);
  }
 
  @Override
  public void start(Stage primaryStage){
    // vamos criar três botões
    Button btn1 = new Button("Botão 1");
    Button btn2 = new Button("Botão 2");
    Button btn3 = new Button("Botão 3");
     
    // agora criamos um laytou HBox e colocamos
    // os três botões nele
    HBox hBox = new HBox();
    hBox.getChildren().add(btn1);
    hBox.getChildren().add(btn2);
    hBox.getChildren().add(btn3);
     
    // vamos definir o espaço interno do HBox usando
    // um Inserts (top, direita, baixo, esquerda)
    hBox.setPadding(new Insets(20, 20, 20, 20));
    
    // criamos a cena e fornecemos o layout a ela
    // e definimos a largura e altura da cena
    Scene scene = new Scene(hBox, 400, 300);
     
    // adicionamos a cena ao palco principal
    primaryStage.setScene(scene);
    // e mostramos o palco
    primaryStage.show();
  }
}

procedure TForm1.Button1Click(Sender: TObject);
begin
  // vamos inserir um novo item na TListBox
  ListBox1.Items.Add('Osmar J. Silva');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  // vamos obter o texto do item selecionado na TListBox
  ShowMessage(ListBox1.Items[ListBox1.ItemIndex]);
end;

# obtém o dia do mês usando o método day
agora = Time.new
dia = agora.day

# exibe o resultado
puts "Dia do mês usando a função day: " + dia.to_s

# obtém o dia do mês usando o método mday
agora = Time.new
dia = agora.mday

# exibe o resultado
puts "Dia do mês usando a função mday: " + dia.to_s

v1 = 5
v2 = 2
res = v1 / v2
print res

v1 = 5.0
v2 = 2
res = v1 / v2
print res

# força o novo comportamento do operador
# de divisão
from __future__ import division
 
v1 = 5
v2 = 2
res = v1 / v2
print res

procedure TForm1.Button1Click(Sender: TObject);
var
  nome: string;
begin
  nome := 'OSMAR';

  // vamos converter a string para letras minúsculas
  nome := AnsiLowerCase(nome);

  // exibe o resultado
  ShowMessage(nome);
end;