Лабораторная работа №6 ООРПМ

Факультет: Прит
Что: Лабораторная работа №6 (вариант 17)
Кто делал: Чуденков А. (Защитил)
Листинг:

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

#include

#pragma hdrstop

#include "Unit1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TForm1::Button1Click(TObject *Sender)

{

char i;

i=Edit1->Text[1];

if (Edit1->Text[1]="") {Label1->Caption="Error";}

int function;

void function()

{

if ((i<='9') && (i>='0')) {Label1->Caption="Number";}

else if ((i<='z') && (i>='a')) {Label1->Caption="Lat. Symbol";}

else if ((i<='Z') && (i>='A')) {Label1->Caption="Lat. Symbol";}

//else if (i=='NULL') {Label1->Caption="Error";}

else {Label1->Caption="Symbol";}

}

}

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

Препод: Илюшечкин