String To Byte => Borland C++ Algoritma

void __fastcall TForm1::Button1Click(TObject *Sender)
{
int len ;
BYTE komut[1024];
len = Edit1->Text.Length()/2;
int yer =1;
for (int i = 0; i < len; i++) {
int bayt = StrToInt("0x"+Edit1->Text.SubString(yer,2));
komut[(yer-1)/2]=bayt;
yer+=2;
}
}