Einzelnen Beitrag anzeigen

MrKnogge

Registriert seit: 9. Jun 2003
Ort: Pforzheim
2.458 Beiträge
 
Delphi 2007 Professional
 
#8

Re: Textfarbe eines Hints ändern?

  Alt 24. Jul 2005, 10:19
Screen.HintFont geht, aber warum die hälfte der Hint-Eigenschaften unter Tapplication zu finden ist, und die andere unter TScreen kann ich nun nicht ganz verstehen.

Als zweite Lösung gäbe es noch:

Delphi-Quellcode:
type
  TMyHintWindow = class(THintWindow)
    constructor Create(AOwner: TComponent); override;
  end;


implementation

{....}

constructor TMyHintWindow.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  with Canvas.Font do
  begin
    Name := 'Arial';
    Size := Size + 5;
    Style := [fsBold];
  end;
end;

procedure TForm2.FormCreate(Sender: TObject);
begin
  HintWindowClass := TMyHintWindow;
  Application.ShowHint := False;
  Application.ShowHint := True;
end;
gruss
Christian Bootz
Einstein ist tot, Newton ist tot,
und mir ist auch schon ganz schlecht...
  Mit Zitat antworten Zitat