بر طرف کردن warning در کار با رنگ ها

[karzari]

سلام
من کد زیر رو دارم

Shape1->Brush->Color = RGB(111,0,0);
اما وقتی کامپایل میکنم این warning رو نشون میده

[C++ Warning] FormColorSetting.cpp(25): W8018 Assigning unsigned long to TColor
می خوام بدونم که چطور باید این پیغام رو از بین ببرم
همچنین کد زیر رو هم دارم

void __fastcall TFormMain::Image1MouseMove(TObject *Sender,
TShiftState Shift, int X, int Y)
{
TColor Clr = Image1->Canvas->Pixels[X][Y];
if (Clr == RGB(255,255,0)) {
Timer2->Enabled = false;
}
}
این کد هم این پیغام رو میده

[C++ Warning] Main.cpp(94): W8012 Comparing signed and unsigned values
در کد دوم موس وقتی روی عکس حرکت میکنه وقتی که به پیکسلی رسید که رنگش با تابع RGB برابر بود شرط اجرا بشه
دوستان لطفا منو در رفع این پیغام ها یاری کنند

[BORHAN TEC]

در مورد اول کد را باید به شکل زیر بنویسید:
Shape1->Brush->Color = TColor(RGB(111, 0, 0));

و در مورد دوم نیز کد را به شکل زیر بنویسید:
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
int X, int Y) {
TColor Clr = Image1->Canvas->Pixels[X][Y];
if ((unsigned)Clr == RGB(255, 255, 0)) {
Timer2->Enabled = false;
}
}