rendered paste body//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
char *list;
void __fastcall TForm1::FormCreate(TObject *Sender)
{
TStringList *list = new TStringList; //masyvas
list->Add("L&M");
list->Add("Marlboro");
list->Add("LD");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MaskEdit1Change(TObject *Sender)
{
float kaina;
if( MaskEdit1 ) {
if ( MaskEdit1 -> GetTextLen()) {
if(( list& -> operator[] (0) == MaskEdit1->Text)) {
MaskEdit2->Text = "Labas";
}
}
}
}
//---------------------------------------------------------------------------