Private Function diretel.frm_configuraciones.Form_Unload.3.txt

Calls out:

Incoming calls for diretel.frm_configuraciones.Form_Unload.3.txt

Decompiled source code follows:

FLocal4 = Trim(chk_cumple.Value)
FLocal7 = Global4304916.Fields.Item("cumple").Value
If (((cmb_puerto.Text = FormVar1) Or (txt_settings.Text = FormVar2)) Or (FLocal4 != FLocal7))
      Global4304916.Edit
      Global4304916.Collect = ("puerto" Mid(cmb_puerto.Text,5))
      Global4304916.Collect = ("settings" frm_configuraciones.7.txt_settings)
      Global4304916.Collect = ("cumple" Trim(chk_cumple.Value))
      Global4304916.Update 1,False
End If
If (Global4304924 = txt_ruta.Text)
      Global4304924 = txt_ruta.Text
      App.Path
      kernel32.dll.WritePrivateProfileStringA
End If
End Sub