043

Deklaracja stałych i zmiennych w programie 43

5. W ostatnim etapie dwukrotnie klikamy przycisk Zakończ i w funkcji void

_fastcall TForm1::Button2Click(TObject *Sender) umieszczamy następujący

kod:

void_fastcall TForml ::Button2Click(TObject *Sender)

{

Edit4->Text="Koniec programu";

}

Kilka słów poświęcimy następującym linijkom kodu:

Edit2->T ext=lntToStr(liczba);

Edit3->Text=FloatToStrF(pomiar,ffNumber,4,2);

Zapis Edit2->Text=lntToStr(Iiczba) oznacza, że aby w polu Edit2 mogła się pojawić zmienna liczba, to musi na niej zostać wykonana konwersja typu za pomocą funkcji IntToStr. Więcej informacji na temat systemowych funkcji konwersji typu Czytelnik znajdzie w dodatku.

Zapis Edit3->Text=FloatToStrF(pomiar,ffNumber,4,2) oznacza, że aby w polu Edit3 mogła się pojawić zmienna pomiar typu rzeczywistego, musi ona zostać poddana najpierw „formatowaniu”. Więcej informacji na temat „formatowania” łańcuchów tekstowych Czytelnik znajdzie w dodatku.

Oto cały program napisany w C++ Builder (P02).

#include <vcl.h>

#pragma hdrstop

#include "Unitl.h"

#pragma package(smartjnit)

#pragma resource "\dfm"

TForml *Form1;

_fastcall TForml ::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

^v°id_fastcall TForml ::Button1Click(TObject *Sender)

l

char litera; int liczba; float pomiar;

litera = ’A';