Форум: "Основная";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];
ВнизПоловину строки Hint a выделить жирным Найти похожие ветки
← →
DelphiLexx © (2006-04-06 16:13) [0]Есть Hint в котором хранится строка. Как часть слов выделить жирным, а часть осавить по умолчанию. Желательно это сделать без Application.OnShowHint :=
← →
Handle (2006-04-06 17:41) [1]Насчёт
> Как часть слов выделить жирным, а часть осавить по умолчанию.
пока сам не знаю.
А весь hint выглядит так.
Name := "Arial";
Size := Size + 33;
Style := [fsBold];
ну и сответственно
Form.ShowHint:= true;
ТвойControl.Hint:= "бла бла бла";
без Application.OnShowHint :=unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TMyHintWindow = class(THintWindow)
constructor Create(AOwner: TComponent); override;
end;
type
TForm1 = class(TForm)
Edit1: TEdit;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
constructor TMyHintWindow.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
with Canvas.Font do
begin
Name := "Arial";
Size := Size + 10;
Style := [fsBold];
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
HintWindowClass := TMyHintWindow;
Application.ShowHint := False;
Application.ShowHint := True;
end;
end.
← →
Handle (2006-04-06 17:43) [2]Ну и типа для ума справку почитай.
F1
← →
DelphiLexx © (2006-04-06 18:41) [3]
> без Application.OnShowHint :=
твой код не позволяет выделять жирным часть содержимого hinta. При чем мне нужно выделения жирным делать не для всех компонент, а только для опреденных, например, для TImage.
← →
Германн © (2006-04-07 01:56) [4]Имхо, стандартный хинт такой функциональности не имеет. Сторонних компонент для хинтов - море, может кто-то из них умеет. Наконец напиши свой. Что за проблема!
← →
GrayFace © (2006-04-07 07:35) [5]> Handle (06.04.06 17:41) [1]
С таким же успехом можно настроить Screen.HintFont
> DelphiLexx
TMyHintWindow, в нем переопределяй Paint и CalcHintRect.
← →
DelphiLexx © (2006-04-07 12:13) [6]
> MyHintWindow, в нем переопределяй Paint и CalcHintRect
Каким образом, приведи пример.
← →
Amoeba © (2006-04-07 13:10) [7]Может лучше не мучаться, а взять готовый компонент (бесплатно, но без исходников)?
http://www.tmssoftware.com/HtmlHint.ZIP
А здесь написано как форматировать текст:
http://www.tmssoftware.com/minihtml.htm
Drop a HTMLHint component on the main form of your application and you can start using HTML formatted hints everywhere in your application. Supports a subset of the HTML formatting tags (see the mini HTML reference).
Если надо, то всю библиотеку (с исходниками) можно взять здесь:
http://www.tdelphi.spb.ru/vcla/tms.zip
← →
DelphiLexx © (2006-04-07 17:22) [8]
> Если надо, то всю библиотеку (с исходниками) можно взять
> здесь:
> http://www.tdelphi.spb.ru/vcla/tms.zip
Под Delphi 2005 где можно взять эту библиотеку.
← →
Amoeba © (2006-04-07 17:51) [9]
> Под Delphi 2005 где можно взять эту библиотеку.
На варезных сайтах.
А по этой ссылке один компонент под все версии Delphi, включая 2005
http://www.tmssoftware.com/HtmlHint.ZIP
← →
Amoeba © (2006-04-07 17:56) [10]
> Под Delphi 2005 где можно взять эту библиотеку.
По случаю откопал в своих архивах. Выслал мылом.
← →
DelphiLexx © (2006-04-07 19:25) [11]
> По случаю откопал в своих архивах. Выслал мылом.
Спасибо.
← →
Leonid Troyanovsky © (2006-04-07 21:02) [12]
> Amoeba © (07.04.06 17:56) [10]
> По случаю откопал в своих архивах. Выслал мылом.
Зря, IMHO. бо поощрение кроспостеров, лентяев и др.
--
Regards, LVT.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.015 c