Необходимо подчеркнуть текст при наведении мыши

[linda88]

Раньше получалось а теперь когда перешла на мультиплатформ - нет

procedure Tmenu.Label1MouseEnter(Sender: TObject);
begin
Label1.Font.Style := [fsUnderline];
end;

Ошибки
[dcc32 Error] Menu1.pas(28): E2003 Undeclared identifier: 'fsUnderline'
[dcc32 Error] Menu1.pas(28): E2010 Incompatible types: 'TFontStyles' and 'Set'

[Serge_Bliznykov]

да вроде бы должно всё работать.
Попробуйте в uses дописать модуль Graphics

[linda88]

Вот мой

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
  FMX.Controls.Presentation, FMX.StdCtrls;

как только добавляю Graphics
delphi embarcadero rad studio 10.3 multiplatform

вот что выдает:

[dcc32 Fatal Error] Menu1.pas(8): F2613 Unit 'Graphics' not found.

[leoparrd]

Вполне возможно, вы или поставили новый Делфи или что-то вроде этого, не очистив старые установки...
В общем вам надо посмотреть все пути к библиотекам. Такое впечатление, что Делфи не видит основную библиотеку.

[Serge_Bliznykov]

Сообщение от linda88

FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
  FMX.Controls.Presentation, FMX.StdCtrls

упс. Так у Вас же проект не VCL.
Это проект типа FireMonkey.
Вот там, вероятно, другие типы данных и другие методы работы со стилем шрифта.
Нужно или переделать ваш код под "огнеобезьянку", либо переделать проект под VCL.

[Pavia]

linda88
Вообще как-то странно. Там в юните стили отключены для всего кроме NET. Пробовал включить не получилось. Видимо какой-то баг или фича.

Можно попробовать через конструктор стилей.

[linda88]

Сообщение от Serge_Bliznykov

упс. Так у Вас же проект не VCL.
Это проект типа FireMonkey.
Вот там, вероятно, другие типы данных и другие методы работы со стилем шрифта.
Нужно или переделать ваш код под "огнеобезьянку", либо переделать проект под VCL.

Нужно под "огнеобезьянку".