[TEFDemo] incompatible parameter list

[Fernando Lucius]

Bom dia!

Tentei compilar o TEFDemo e está dando um erro no método ACBrTEFD1CliSiTefObtemCampo. Alguém poderia dar uma ajuda?

IDE: Delphi Seattle.

SVN atualizado dia: 11/11/15.

SO: Windows 10 - 64 bits

 

Att,

Fernando Lucius

[Daniel Simoes]

É a eterna briga de String x AnsiString...

Remova o evento, e deixe a IDE criá-lo novamente...

[Fernando Lucius]

[Resolvido]

Beleza Daniel!

Fiz a alteração e funcionou!

Antes:

procedure TForm1.ACBrTEFD1CliSiTefObtemCampo(Titulo: String; TamanhoMinimo,
  TamanhoMaximo, TipoCampo: Integer;
  Operacao: TACBrTEFDCliSiTefOperacaoCampo; var Resposta: String;
  var Digitado, VoltarMenu: Boolean);

Depois:

procedure TForm1.ACBrTEFD1CliSiTefObtemCampo(Titulo: String; TamanhoMinimo,
  TamanhoMaximo, TipoCampo: Integer;
  Operacao: TACBrTEFDCliSiTefOperacaoCampo; var Resposta: AnsiString;
  var Digitado, VoltarMenu: Boolean);

 

Obrigado!

[Juliomar Marchetti]

corrigido  no svn

[Daniel Simoes]

Juliomar,

O problema é que agora os usuários de D7 vão reclamar do mesmo problema... :)

[Juliomar Marchetti]

  Em 11/11/2015 at 19:20, Daniel Simoes disse:

Juliomar,

O problema é que agora os usuários de D7 vão reclamar do mesmo problema... :)

Expandir  

Verdade Daniel! ehehe deixa eu fazer então um código minuto e já subo eheheh

[Juliomar Marchetti]

Daniel.. olha lá no exemplo. acredito agora funcionar em ambos!