VPF::Вывод текста на Image->Canvas заданным шрифтом

Rekah

Дата 12.9.2007, 21:13 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 16
Регистрация: 23.7.2007

Репутация: нет
Всего: нет

Pori, еще момент есть, не учли раположение курсора на самом Labele smile

Код


TForm1 *Form1;

bool down;
TPoint pt;
       int d_x=0, d_y=0;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
};
//---------------------------------------------------------------------------



//---------------------------------------------------------------------------
void __fastcall TForm1::Label1MouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
    down=true;
    d_x=X;    //А еще надо учесть расположение курсора на самом Label :)
    d_y=Y;

}
//---------------------------------------------------------------------------


//---------------------------------------------------------------------------
void __fastcall TForm1::Label1MouseUp(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
    down=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Label1MouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
 if(down) {
 GetCursorPos(&pt);
// относительно формы       относительно окна
   Label1->Top       =    (pt.y - Form1->Top )- 30 - d_y;   //Получаем координату курсора по оси у на самой форме, а не экране (30-это высота бортика)
   Label1->Left      =    (pt.x - Form1->Left) - 3 - d_x;   // Аналогично по х}
 }                                     /*3 - левые бортик формы*/
}

SparF

Дата 14.9.2007, 12:48 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 387
Регистрация: 14.9.2006
Где: Санкт-Петербург/М осква

Репутация: нет
Всего: 18

Цитата(abrekos @ 12.9.2007, 09:02

)

Да не, Brush - это кисть, а цвет шрифта определяется так:
Image1->Canvas->Font->Color = ... ;

Это уже давно сделано (самый первый листинг в теме), все равно на цвете не отражается ((

--------------------

Люди, не пользуйтесь пиратским программным обеспечением - переходите на Linux!

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »