Dalvan
-
Total de ítens
47 -
Registro em
-
Última visita
Community Answers
-
Dalvan's post in ACBR-9131 Implementação Cancelamento NFS-e provedor Abase was marked as the answer
Bom dia!
a) Implementação do Cancelamento da NFS-e para provedor Abase (em anexo).
b) Ajuste na leitura do XML ( DocumentXml não estava sendo criado ).
Att.
ABase.Provider.pas.zip
-
Dalvan's post in ACBR-8677 Implementação Cancelamento NFS-e provedor Citta ( Casca/RS e São Domingos do Sul/RS ) was marked as the answer
Boa Noite!
a) Implementação do Cancelamento da NFS-e para provedor Citta (em anexo).
b) Links para as cidades Casca/RS e São Domingos do Sul/RS (em anexo).
Att.
Citta.Provider.pas.zip ACBrNFSeXServicosRTC.zip
-
Dalvan's post in Capcha acesso ao simples nacional was marked as the answer
Faz um teste usando a função
uses Registry
procedure DefineIEVersao(Versao:Integer=11000);
const
REG_KEY = 'Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION';
var
Reg: TRegistry;
AppName: String;
begin
AppName := ExtractFileName(Application.ExeName);
//Versao := 11000;
Reg:=nil;
try
Reg := TRegistry.Create();
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey(REG_KEY, True) then
begin
if Versao = 0 then
Reg.DeleteValue(AppName)
else
Reg.WriteInteger(AppName, Versao);
Reg.CloseKey;
end;
except;
end;
if( Assigned( Reg )) then
FreeAndNil(Reg);
end;
anter de chamar a pagina pelo TWebBrowser
DefineIEVersao(8000);