Hint-Popup manuell anzeigen

[Puddi]

Vielen Dank für die Hilfe , Sharkys Codeschnipsel hat das Problem gelöst. Hab es etwas für meine Bedürfnisse angepasst:

Delphi-Quellcode:

procedure TForm1.DataMainKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var OldHint: String;
begin
  DataMain.ShowHint:=false;
  OldHint:=DataMain.Hint;
  DataMain.Hint:='Trallala';
  DataMain.ShowHint:=true;
  if (Oldhint  <> DataMain.Hint) then
    begin
      Application.CancelHint;
    end;
end;