VST实例(10) hint(提示)
VST也支持提示(hint)。
毫无疑问,要让VST支持hint,首先肯定需要设置:SHOWHINT:=TRUE;
其次,还应该设置hintmode。
TVTHintMode = (
hmDefault,
hmHint,
hmHintAndDefault,
hmTooltip
);
hmDefault :显示控件的hint,即VST的hint。
hmHint :显示程序返回的提示。
hmHintAndDefault :如果未对准节点,则显示控件的提示,否则类似hmhint
hmTooltip :当节点的单元格信息不能完全显示时,显示单元格的celltext的全部信息。
最后,在事件“ongethint”中给出提示信息。
本程序简化了提示信息,代码如下:
procedure TForm2.vstGetHint(Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex; var LineBreakStyle: TVTTooltipLineBreakStyle; var HintText: string); begin HintText:='信息:'+vst.Text[NODE,Column]; end;
此外,你还可以在事件“ongethintsize”和“ongethintkind”中对提示信息进行进一步的定制。如果你选择了自己绘制提示信息,则需要在事件“ondrawhint”中自己绘制提示信息。
提示信息是支持换行的!