Таймер, будильник (С++) Bilder

ShellExecute()

ShellExecute(NULL, "open", "notepad.exe", NULL, NULL, SW_SHOWNORMAL);

ShellExecute(NULL, "open", "http://www.microsoft.com", NULL, NULL, SW_SHOWNORMAL);

ShellExecute(NULL, "open", "calc.exe", NULL, NULL, SW_SHOWNORMAL);

ShellExecute(NULL, "open", "mspaint.exe", NULL, NULL, SW_SHOWNORMAL);

ShellExecute(NULL, "open", "wmplayer.exe", NULL, NULL, SW_SHOWNORMAL);

switch(RadioGroup1->ItemIndex)
 {
  case 0:{ShellExecute(NULL, "open", "mspaint.exe", NULL, NULL, SW_SHOWNORMAL);break;}
  case 1:{ShellExecute(NULL, "open", "notepad.exe", NULL, NULL, SW_SHOWNORMAL);break;}
  case 2:{ShellExecute(NULL, "open", "calc.exe", NULL, NULL, SW_SHOWNORMAL);break;}
  case 3:{ShellExecute(NULL, "open", "wmplayer.exe", NULL, NULL, SW_SHOWNORMAL);break;}
  case 4:{ShellExecute(NULL, "open", "http://www.microsoft.com", NULL, NULL,  SW_SHOWNORMAL);break;}
 }

void __fastcall TForm1::Button2Click(TObject *Sender)
 
{
{
do
{
}
while(RadioGroup1->ItemIndex);
iAlarmHours=StrToInt(FormatDateTime("h", timepicker->Time));
iAlarmMinutes=StrToInt(FormatDateTime("n", timepicker->Time));
Timer1->Enabled=true; // Таймер будильника запущен.
}
}

Edit1->Text=FloatToStr(StrToFloat(Edit1->Text)+1);

Edit1->Text=Edit1->Text+1;

Edit1->Text = 1;
int i=1;
int j = StrToInt(Edit1->Text)+1;
ShowMessage(j);