Olá,
alguém sabe se tem como abrir um arquivo no forms 6i feito pelo wordpad ?
tentei fazer o descrito abaixo mas não funcionou. Tem alguma limitaçao para tipos de arquivo para serem abertos ?
Bom dia,
tudo bem?
acredito que não.
Utilizo um programa (fmx) para abrir arquivos a partir de uma aplicação form6i utilizando o aplicativo padrão de leitura do tipo de arquivo instalado no sistema operacional da maquina cliente.
procedure prc_executa(par_caminho_arquivo varchar2 default null) is
ole_item ITEM;
va_caminho_arquivo varchar2(1002):=pck_arquivo.caminho;
begin
pck_arquivo.prc_encerrar;
if par_caminho_arquivo is not null then
va_caminho_arquivo := par_caminho_arquivo;
end if;
ole_item := FIND_ITEM('OLE_ARQUIVO');
IF NOT ID_NULL(ole_item) THEN
Forms_OLE.Initialize_Container(ole_item, va_caminho_arquivo);
END IF;
IF Forms_OLE.Server_Active(ole_item) = FALSE THEN
Forms_OLE.Activate_Server(ole_item);
END IF;
--
Forms_OLE.Exec_Verb(ole_item, 1);
--Forms_OLE.Exec_Verb(ole_item,'Edit');
--
end;