Приложение "Сотовый телефон"
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
p;
UnitMainFm.cpp
// -
#include
#pragma hdrstop
#include UnitMainFm.h
// -
#pragma package (smart_init)
#pragma resource *.dfm
#define MAINMENU 0;
#define SMS 1;
#define CALC 2;
#define CALENDAR 3;
#define NODES 4;
#define PICTURES 5;
#define ALARM 6;
#define MAP 7;
#define SETTINGS 199;
#define CALL 8;
#define SMSNUM 9;
*MainFm;
// -
__fastcall TMainFm:TMainFm (TComponent* Owner)
: TForm(Owner)
{
}
// -Обработчик события создания формы-
void __fastcall TMainFm: FormCreate (TObject *Sender)
{= new Graphics:TBitmap;>Width = Width;>Height = Height;= MAINMENU;
rezhim = 0; // Профиль Мелодия вибро и тд.
alarmTime = 00:00;t;(&t);= t.wHour; // Время будильника= (t.wMinute + 2)% 60;= true; // Будильник вкл. выкл.
}
// -__fastcall TMainFm: FormClose (TObject *Sender, TCloseAction &Action)
{Buf;
}
// -Отрисовать главное меню-
void __fastcall TMainFm: BuildImage()
{>Canvas->Brush->Color = clWhite;>Canvas->FillRect (TRect(0, 0, Buf->Width, Buf->Height));:TBitmap *tmp = new Graphics:TBitmap;>Transparent = true;>TransparentColor = clWhite;(FileExists (ExtractFilePath(Application->ExeName)+\\pic\\iPhone_bg.bmp))>LoadFromFile (ExtractFilePath(Application->ExeName)+\\pic\\iPhone_bg.bmp);>Canvas->Draw (0, 0, tmp);
>TransparentColor = clBlack;(FileExists (ExtractFilePath(Application->ExeName)+\\pic\\iPhone_menu2.bmp))>LoadFromFile (ExtractFilePath(Application->ExeName)+\\pic\\iPhone_menu2.bmp);>Canvas->Draw (0, 0, tmp);
tmp;
}
// -__fastcall TMainFm: FormPaint (TObject *Sender)
{>Draw (0, 0, Buf);
}
// -__fastcall TMainFm: FormShow (TObject *Sender)
{();
}
// -Обработчик события нажатия мышкой по форме-
void __fastcall TMainFm: FormMouseDown (TObject *Sender,Button, TShiftState Shift, int X, int Y)
{
//ShowMessage(X);
//ShowMessage(Y);
// 38-74 103 86-124 136-174 185-222 103
// 38 137 222 137
// 38 161 222 161
// 38 197 222 197
// 38 345 222 345
// 38 381 222 381
// Клавиатура
// 202-222 226-248 250-270 273-295 297-317
// 25-43 47-65 69-86 90-107 111-128 132-150 154-171 174-193 196-212 217-233(X > 190 && X 321 && Y < 337)
{ // Кнопка Назад
if (TimerAlarm->Enabled)
{>Enabled = false;= MAINMENU;();
}(state!= 9)
{>Enabled = false;= MAINMENU;();
} else
{(TimerSend->Enabled)
{>Enabled = false;= MAINMENU;();
} else
{= SMS;();
}
}
}(TimerCall->Enabled || TimerSend->Enabled || TimerAlarm->Enabled) return;
(state == 7)
{(Y > 202 && Y < 222)
{(X > 25 && X 217 && X < 233) textFrend += 0;
}(Y > 226 && Y < 248)
{(X > 25 && X 217 && X < 233) textFrend += Х;
}(Y > 250 && Y < 270)
{(X > 25 && X 217 && X < 233) textFrend += Э;
}(Y > 273 && Y < 295)
{(X > 25 && X 217 && X < 233) textFrend +=.;
}(Y > 297 && Y < 317)
{(X > 69 && X 196 && X < 212) textFrend. Delete (textFrend. Length(), 1);
}(X > 25 && X 321 && Y < 357)
{ // Кнопка Удалить все
textFrend=;
clkMap();
} else clkMap();
}(state == 1)
{ //SMS(Y > 202 && Y < 222)
{(X > 25 && X 217 && X < 233) textSMS += 0;
}(Y > 226 && Y < 248)
{(X > 25 && X 217 && X < 233) textSMS += Х;
}(Y > 250 && Y < 270)
{(X > 25 && X 217 && X < 233) textSMS += Э;
}(Y > 273 && Y < 295)
{(X > 25 && X 217 && X < 233) textSMS +=.;
}(Y > 297 && Y < 317)
{(X > 69 && X 196 && X < 212) textSMS. Delete (textSMS. Length(), 1);
}(X > 25 && X