Imprimindo dados nos componentes

Se você ainda não se sente familiarizado com o C++Builder, ou não se sente seguro para a respeito da forma correta de se colocar componentes nos formulários (Forms), antes de prosseguir no curso, dê uma olhada nas seguintes lições:

Introdução ao BCB

Introdução ao BCB - 2ª parte

Podemos inserir palavras, textos ou frases em diversos componentes através códigos ou de suas propriedades no Object Inspector. Essas propriedades, uma vez demarcadas, determinam o modo que o programa iniciará a sua execução. Podemos, posteriormente, em tempo de execução, alterar essas propriedades de diversas formas, conforme o caso.

Exemplos: No Object Inspector, mude o texto da propriedade Caption do Form, de um Label, de um botão, e assim por diante e visualize, já no projeto, o resultado da alteração.

Outros componentes, derivados de outros ramos, possuem outras formas de ser alterados. Por exemplo, altere a propriedade Text de um Edit, ou de um MaskEdit; ou a propriedade Items de um ListBox; ou as propriedades Text e Items de um ComboBox etc.

Vejamos algumas formas de inserir textos em componentes, através do código, em tempo de execução:

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

Canvas->TextOut( Canvas->PenPos.x, Canvas->PenPos.y,
                "Imprimindo um texto no form com o objeto Canvas" );

Label1 -> Canvas->TextOut( Canvas->PenPos.x, Canvas->PenPos.y,
                "Imprimindo um texto no Label com o objeto Canvas" );

Canvas->TextOut( Canvas->PenPos.x = 100, Canvas->PenPos.y = 100,
       "Imprimindo um texto nas coordenadas X = 100 e Y = 100 do Form" );

}

Outro exemplo:

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{
/* Este exemplo deve ser testado com dois cliques. 
O primeiro chamará a propriedade Caption; o segundo, o objeto Canvas */
Label1 -> Caption = "Testando o Caption";

/* Na linha de código abaixo, precisamos determinar uma coordenada diferente 
da default (0, 0), para que esse texto não venha a sobrescrever o Caption de Label */
Label1 -> Canvas->TextOut( Canvas->PenPos.x = 100, Canvas->PenPos.y = 100,
              "Imprimindo um texto nas coordenas X = 100 e Y = 100 do Label" );

}

Outro exemplo:

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

Label1 -> Caption = "Testando propriedades";
Edit1->Text = "Continuando o teste ...";
ListBox1->Items-> Add(Label1 -> Caption);
ListBox1->Items-> Add("Testando ...");
ComboBox1 -> Text = "Fala, Grande!";
ComboBox1 -> Items -> Add(Label1 -> Caption);
ComboBox1 -> Items -> Add("Fala, Grande...");
ComboBox1 -> Items -> Add(Edit1->Text);

}

Outro exemplo:

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
ShowMessage("Alô, Thérbio!");

ShowMessage("Alô, Thérbio!"
            "\nEstou na segunda caixa de mensagem,\n e na terceira linha");

MessageBox(0, "Agora uma caixa de mensagens \nm\n\ta\n\t\ti\n\t\t\ts\neditada!",
           "Caixa de Aprendizagem...", 64);

}

Nota introdutória. No avançar deste curso, você perceberá que, propositadamente, usamos alguns nomes, comandos ou tipos de dados com os quais você poderá não estar habituado a trabalhar. Não se assuste e nem se preocupe em querer entender imediatamente todos os detalhes apresentados, pois tudo deverá ficar bastante claro no tempo certo. Concentre-se, basicamente, em entender a manipulação dos dados referentes ao tópico apresentado.