Fórum Como eu faço p/ chamar esta função em um form? #179667
04/09/2003
0
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
Curtir tópico
+ 0Posts
04/09/2003
Flm2000
Gostei + 0
04/09/2003
Flm2000
Gostei + 0
04/09/2003
Flm2000
Undeclared identifier : ´ArqINI´ ????
o que fazer???
Gostei + 0
04/09/2003
Macario
retire essa linha
Gostei + 0
04/09/2003
Wicker Man
Abraços !
Gostei + 0
04/09/2003
Maxwell_monteiro
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)