On 2014-03-30 04:45, Frank Poretzky wrote:
| procedure TFormTest.DoAppOnShowHint( var HintStr: String;
| var CanShow: Boolean;
| var HintInfo: THintInfo);
| begin
| CanShow := true;
| HintStr := HintStr + '
Hi Graeme,
on Sun, 30 Mar 2014 10:09:31 +0100, you wrote:
On 2014-03-30 04:45, Frank Poretzky wrote:
| procedure TFormTest.DoAppOnShowHint( var HintStr: String;
| var CanShow: Boolean;
| var HintInfo: THintInfo);
|
On Sun, Mar 30, 2014 at 12:21 PM, Frank Poretzky
poret...@nym.mixmin.net wrote:
Hi Graeme,
on Sun, 30 Mar 2014 10:09:31 +0100, you wrote:
On 2014-03-30 04:45, Frank Poretzky wrote:
| procedure TFormTest.DoAppOnShowHint( var HintStr: String;
| var
On Sun, 30 Mar 2014 14:50:08 -0300
Flávio Etrusco flavio.etru...@gmail.com wrote:
On Sun, Mar 30, 2014 at 12:21 PM, Frank Poretzky
poret...@nym.mixmin.net wrote:
Hi Graeme,
on Sun, 30 Mar 2014 10:09:31 +0100, you wrote:
On 2014-03-30 04:45, Frank Poretzky wrote:
| procedure
Hi Flávio,
on Sun, 30 Mar 2014 14:50:08 -0300, you wrote:
There's a bug in application.inc, line 816. OnShowHint only executes
if there are hint handlers registered:
(...)
i:=FApplicationHandlers[ahtShowHint].Count;
if CanShow and (i0) then begin
if Assigned(FOnShowHint) then
Hi!
A method
| procedure TFormTest.DoAppOnShowHint( var HintStr: String;
| var CanShow: Boolean;
| var HintInfo: THintInfo);
| begin
| CanShow := true;
| HintStr := HintStr + ' - Modified';
| end;
assigned to