Скачать: CL | DM;

А как вставить BMP в hint ?   Найти похожие ветки 

← →
pirat ©   (2002-10-21 15:16) [0]

Помогите, кто знает как это сделать, плз. :)

---

← →
Игорь Шевченко ©   (2002-10-21 15:20) [1]

THintWindow.Paint перекрыть

---

← →
MegaBass ©   (2002-10-21 15:46) [2]

правильно нащет THintWindow
остальное HELP читай

---

← →
pirat ©   (2002-10-22 12:18) [3]

я так понял что должен от него уначледовать свой класс, перекрыть виртуальные методы, и установить HintWindowClass равный объекту своего класса, правильно?
никаких Paint я там не нашел, чтож, самому вставлять?

---

← →
Skier ©   (2002-10-22 12:22) [4]

>pirat


> никаких Paint я там не нашел, чтож, самому вставлять?



THintWindow = class(TCustomControl)
private
FActivating: Boolean;
procedure WMNCHitTest(var Message: TWMNCHitTest); message WM_NCHITTEST;
procedure WMNCPaint(var Message: TMessage); message WM_NCPAINT;
procedure CMTextChanged(var Message: TMessage); message CM_TEXTCHANGED;
protected
procedure CreateParams(var Params: TCreateParams); override;
procedure Paint; override;
public
constructor Create(AOwner: TComponent); override;
procedure ActivateHint(Rect: TRect; const AHint: string); virtual;
procedure ActivateHintData(Rect: TRect; const AHint: string; AData: Pointer); virtual;
function CalcHintRect(MaxWidth: Integer; const AHint: string;
AData: Pointer): TRect; virtual;
function IsHintMsg(var Msg: TMsg): Boolean; virtual;
procedure ReleaseHandle;
property BiDiMode;
property Caption;
property Color;
property Canvas;
property Font;
end;

---

← →
Игорь Шевченко ©   (2002-10-22 12:41) [5]

pirat © (22.10.02 12:18)

Рассуждения правильные, так и надо делать.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c