Como eu faço p/ chamar esta função em um form?
unit pFUNCOES;
interface
implementation
uses IniFiles;
function ArqINI(strDADO, strNOMEARQ, strTITULO, strSECAO: string; intGV: integer): string;
var Ini: TIniFile;
begin
ArqINI := ´´;
Ini:=TIniFile.Create(strNOMEARQ);
try
if intGV = 1 then
ArqINI := Ini.ReadString(strSECAO, strTITULO, ´´)
else
Ini.WriteString(strSECAO, strTITULO, strDADO);
finally
Ini.Free;
end;
end;
end.
Obrigado. :oops:
interface
implementation
uses IniFiles;
function ArqINI(strDADO, strNOMEARQ, strTITULO, strSECAO: string; intGV: integer): string;
var Ini: TIniFile;
begin
ArqINI := ´´;
Ini:=TIniFile.Create(strNOMEARQ);
try
if intGV = 1 then
ArqINI := Ini.ReadString(strSECAO, strTITULO, ´´)
else
Ini.WriteString(strSECAO, strTITULO, strDADO);
finally
Ini.Free;
end;
end;
end.
Obrigado. :oops:
Flm2000
Curtidas 0
Respostas
Flm2000
04/09/2003
Eu já adicionei a Unit pFuncoes em uses do meu form, mas ele não reconhece a função. o que estou fazendo errado??? :shock:
GOSTEI 0
Flm2000
04/09/2003
Será que alguem poderia me ajudar??? :(
GOSTEI 0
Flm2000
04/09/2003
O erro é esse:
Undeclared identifier : ´ArqINI´ ????
o que fazer???
Undeclared identifier : ´ArqINI´ ????
o que fazer???
GOSTEI 0
Macario
04/09/2003
O erro é esse:
Undeclared identifier : ´ArqINI´ ????
o que fazer???
retire essa linha
GOSTEI 0
Wicker Man
04/09/2003
vc não esta declarando essa variavel ´ArqINI´, é melhor vc trocar o nome dela e declara-la dentro da função..... acho q isso vai resolver o seu problema.
Abraços !
Abraços !
GOSTEI 0
Maxwell_monteiro
04/09/2003
experimente colocar o prototipo da função antes do implementation!
GOSTEI 0