gIniFileString = "[" + gIniSecName + "]" + Chr (13) + Chr (10) + ; Chr (13) + Chr (10) + ; "Login = " + IIf ( gTipoLogin = "A", "Automatico", "Manual") + Chr (13) + Chr (10) + ; "CargaArquivos = " + IIf ( gCargaArquivos = "A", "Automatica", "Manual") + Chr (13) + Chr (10) + ; "ItensNoPedido = " + lTrim (Transform (gItensNoPedido, "999999")) + Chr (13) + Chr (10) + ; "AGCOnetDir = " + gAGCOnetDir + Chr (13) + Chr (10) + ; "EnviaDir = " + gEnviaDir + Chr (13) + Chr (10) + ; "RecebeDir = " + gRecebeDir + Chr (13) + Chr (10) + ; "AprovaDir = " + gAprovaDir + Chr (13) + Chr (10) + ; "Comunica = " + gStartDir + "Comunica.Exe" StrToFile (gIniFileString, AddBS (gStartDir) + gIniFileName) && Creates the .Ini fileHope it helps,