input it outputs whats under deafult:
Application should open different websites, websites that will open will depend on code that user inputs. And when I enter valid code it outputs "Code not valid. Contact @thataccount on instagram for a new one." and outputs same text if I user inputs invalid code (which is good).
here is code.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
UnicodeString code, key;
int br;
Edit1->Text = code;
if (code=="C577F") br=1;
if (code=="A9967") br=2;
if (code=="G02C1") br=3;
if (code=="TB4FA") br=4;
if (code=="U3E4B") br=5;
if (code=="KR11V") br=6;
if (code=="DFF9D") br=7;
if (code=="L738D") br=8;
if (code=="AA46C") br=9;
if (code=="EC6E7") br=10;
if (code=="T7BCE") br=11;
if (code=="JT429") br=12;
if (code=="R5F2C") br=13;
if (code=="O582B") br=14;
if (code=="A1FB4") br=15;
switch(br)
{
case 1:
key="1";
WebBrowser1->URL =
break;
case 2:
key="2";
WebBrowser1->URL =
break;
case 3:
key="3";
WebBrowser1->URL =
break;
case 4:
key="4";
WebBrowser1->URL =
break;
case 5:
key="5";
WebBrowser1->URL =
break;
case 6:
key="6";
WebBrowser1->URL =
break;
case 7:
key="7";
WebBrowser1->URL =
break;
case 8:
key="8";
WebBrowser1->URL =
break;
case 9:
key="9";
WebBrowser1->URL =
break;
case 10:
key="10";
WebBrowser1->URL =
break;
case 11:
key="11";
WebBrowser1->URL =
break;
case 12:
key="12";
WebBrowser1->URL =
break;
case 13:
key="13";
WebBrowser1->URL =
break;
case 14:
key="14";
WebBrowser1->URL =
break;
case 15:
key="15";
WebBrowser1->URL =
break;
default:
ShowMessage("Code not valid. Contact @thataccount on instagram for a new one.");
}
}
I removed URLs from here because of advertising
Aucun commentaire:
Enregistrer un commentaire