Конференция "KOL" » Weblinks [Delphi, Windows]
 
  • RusSun © (14.01.19 17:13) [0]
    Доброе время суток.
    Тема:
    "Отображение ссылки при наведении на нее курсором как в хроме
    в строке form.StatusText[0]:= "Weblink".
    В kol проекте."

    Оригинал VCL здесь:
    http://delphiexpert.ru/delphi-poluchaem-ssyilki-so-straniczyi-pri-navedenie-kursora.html

    Измененный мной здесь:
    https://yadi.sk/d/oHNodIZabFWXlw

    Вопрос: "Как реализовать отображение ссылки при наведении на нее курсором 'как в хроме' в строке form.StatusText[0]:= "Weblink".
    В kol проекте на примере WebBrowser?" Или возможно есть другие варианты=)

    Заранее спасибо!
  • Сапёр (15.01.19 07:35) [1]
    Не имею KOL, но в обычном IE это событие OnStatusTextChange.
  • RusSun © (15.01.19 21:27) [2]

      ...
      procedure HtmlStatusTextChange(Sender: TObject; const Text: WideString);
    end;
    procedure TForm1.HtmlStatusTextChange(Sender: TObject; const Text: WideString);
    begin
    form.StatusText[0]:= PChar(AnsiString(Text));
    end;
    ...
    html.OnStatusTextChange := HtmlStatusTextChange;


    toСапёр Спасибо! =)
 
Конференция "KOL" » Weblinks [Delphi, Windows]
Есть новые Нет новых   [118231   +23][b:0][p:0.001]