ACBrPosPrinter com Firemonkey Erro TPrinter/TPrinterDevice

[benefreitas]

Srs,

Estou montando um aplicativo simples de impressão usando o componente ACBrPosPrinter com Delphi 10.3.3 Firemonkey.

A intensão é parametrizar o componente ACBrPosPrinter com leitura de arquivo .INI e imprimir o conteúdo de um TMemo.

Incluí no uses do aplicativo todas as referências do pacote de Testes porém, ao compilar o aplicativo, estou recebendo erro nessa procedure abaixo

procedure TACBrDeviceRaw.AcharPortasRAW(const AStringList: TStrings);
var
  PrinterSys: TPrinter;
  i: Integer;
begin
  PrinterSys := Printer;
  if Assigned(PrinterSys) then
    For i := 0 to PrinterSys{$IfNDef FMX}.Printers{$EndIf}.Count-1 do
      AStringList.Add('RAW:'+PrinterSys.Printers{$IfDef FMX}.Title{$EndIf});
end;
 

 

[BigWings]

8 minutos atrás, benefreitas disse:

Estou montando um aplicativo simples de impressão usando o componente ACBrPosPrinter com Delphi 10.3.3 Firemonkey.

Incluiu a diretiva FMX nas opções do projeto?

 

[benefreitas]

Valeu BigWings! Era isso mesmo...

aprendi mais uma.

Obrigado!

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

[Juliana Tamizou]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado