Rette i XML fil

SoundAlert.Value = "xxx"

eller

SoundAlert.FirstChild.Value = "xxx"

vil jeg tro

Muligvis. Jeg tænker bare - jeg har jo kaldt en Reader. Kan man skrive til den?

Dine forslag returnerer ingen fejl, men heller ingen ting bliver skrevet til XML'en...

hvis du mener filen saa skal dit XmlDocument naturligvis skrives tilbage til filen
for at det bliver gemt permanent

hint: Save metoden

Den tanke jeg har naturligvis også selv haft. Men så får jeg beskeden:

'Save' is not a member of 'System.Xml.XmlTextReader'..?

nej

den er et member af XmlDocument

Dvs. SettingsDoc.Save() eller SettingsDoc.Save(XMLTextReader) ?

Ingen af dem virker.

Er helt grøn i det her, så jeg fatter muligvis ikke en bjælle af, hvad du forsøger at fortælle mig...  :)

SettingsDoc.Save("Settings.xml")

er nok det nemmeste men du kan fgodt bruge Writer ogsaa

Ser rigtigt ud, men får denne fejl:

Processen kan ikke få adgang til filen 'E:\Microsoft Visual Basic 2005 Projects\CheckNewOrder\CheckNewOrder\bin\Debug\Settings.xml', fordi den bliver brugt af en anden proces

faar du kaldt SystemReader.Close() inden du kalder Save ?

Nej, skal jeg det?

Koden:

    Private Sub SaveButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveButton.Click

        Dim NewSoundSetting As String
        Dim NewPopupSetting As String

        If Me.SoundCheckBox.Checked Then
            NewSoundSetting = "True"
        Else
            NewSoundSetting = "False"
        End If

        If Me.PopupCheckBox.Checked Then
            NewPopupSetting = "True"
        Else
            NewPopupSetting = "False"
        End If


        SystemSettings.Instance.SoundAlertActive = NewSoundSetting
        SystemSettings.Instance.PopupAlertActive = NewPopupSetting


        Dim SystemReader As New System.IO.StreamReader("Settings.xml")
        Dim XMLTextReader As New System.Xml.XmlTextReader(SystemReader)
        Dim SettingsDoc As New System.Xml.XmlDocument

        SettingsDoc.Load(XMLTextReader)

        Dim SettingItems As System.Xml.XmlNodeList = SettingsDoc.SelectNodes("settings/items")

        Dim SoundAlert As System.Xml.XmlNode = SettingItems.Item(0).SelectSingleNode("soundalert")
        Dim PopupAlert As System.Xml.XmlNode = SettingItems.Item(0).SelectSingleNode("popupalert")

        SoundAlert.FirstChild.Value = NewSoundSetting
        PopupAlert.FirstChild.Value = NewPopupSetting

        SettingsDoc.Save("Settings.xml")

        XMLTextReader.Close()
        SystemReader.Close()

        Me.Close()

    End Sub

Jamen det var det jeg skulle!

Det synes jeg ikke lige giver mening, men hvad...  :)

Smider du et svar?

jo

fordi indtil den Close bliver kaldt er filen aaben

og svar

NB: man kan ogsaa kalde Load med bare filnavn - det var maaske nemmere !

Kalde Load med bare filnavn? Eksempel?

SettingsDoc.Load("Settings.xml")

og fjern alt med Reader'erne

Jamen det er smukt!  :)

Skal dokumentet ikke lukkes igen på en måde? (Plejer at være god kode-stil).

nej

Load og Save laver begge baade Open og Close for dig

Jamen så er alt jo som det skal være.

Nu jeg har fat i dig...:

Mod flere points - kan du så fortælle om/hvordan man minimerer til den del af Windows System Tray hvor bl.a. uret befinder sig?

det ved jeg ikke

Ok. Kender du så tilfældigvis til publicering gennem Visual Studio 2005 Express - eller en anden Visual Studio?

:D

helller ikke det

jeg bruger ikke Visual Studio

Ok.

Thanx anyway...

For at minimere til System Tray, kan du placere en NotifyIcon komponent på din form (findes i Toolbox'en). Denne opretter et ikon i System Tray'et. Herefter kan du så, når du minimerer din form, gøre den usynlig, og når du klikker på dit ikon i System Tray'et, kan du vise formen igen.

Vist ikke helt..?!  :(

Det ser nu ud som om, at filerne bliver medtaget, men:

1. Wav-filen bliver placeret i en undermappe kaldet "Resources"
2. Min txt-fil bliver placeret i undermappen "bin/debug"

Er dette normalt?

Kan naturligvis ændre referencerne i koden, men vil bare lige tjekke...

Ovenstående indlæg hørte vist ikke til hér..!  :D

Hehe nej.

Men du siger det ikke virker fremragende? Hvor har du problemer?

For det første viser den et andet ikon end det jeg har valgt.

For det andet, når jeg minimerer programmet ligger den minimeret lige over min "Start".

For det tredje kan jeg ikke maksimere igen ved at dobbeltklikke på ikonet.

Er det bare mig, eller..?

Kan ikke lige gennemskue, hvorfor den viser et andet ikon? Det har jeg da aldrig været ude for :o)

Hvis du har sat formens ShowInTaskbar egenskab til False, vil den ikke blive minimeret til taskbaren, men derimod over Start menuen. Men det er sådan set heller ikke noget problem. Det du skal gøre er selv at lave aktiv kode, som skjuler formen (men ikke ikonet i System Tray) når du minimerer, og viser den igen ved et dobbeltklik på ikonet.

Eksempel:


  Private Sub Form1_SizeChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.SizeChanged
    If Me.WindowState = FormWindowState.Minimized Then
      Me.Visible = False
    End If
  End Sub

  Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
    If Me.WindowState = FormWindowState.Minimized Then
      Me.Visible = True
      Me.WindowState = FormWindowState.Normal
    Else
      Me.Activate()
    End If
  End Sub


I ovenstående undersøger jeg, når formens størrelse ændrer sig (dvs. fx når den bliver minimeret) og formen er blevet minimeret. I så fald gør jeg den usynlig (så den ikke ligger og roder over start menuen).

Desuden, hvis jeg dobbelt-klikker på System Tray ikonet, undersøger jeg om formen er minimeret. Hvis den er det, viser jeg formen igen (sætter først Visible = True, og derefter WindowState = Normal). Hvis formen derimod ikke er minimeret, skal den blot aktiveres. Prøv ad.

Det ser sgu rigtig godt ud - og så virker det!

En lille tvist: programmet tjekker løbende om en vis tilstand er aktiveret. hvis den er det, viser den en MessageBox med en besked.

Er programmet minimeret, kommer min MessageBox godt nok - men i minimeret tilstand.

Bliver jeg her nødt til at maksimere hele applikationen?

Det gør faktisk ikke noget, at jeg skal maksimere hele programmet.

Det fungerer faktisk fint.

Har smidt lidt points til dig:

http://www.eksperten.dk/spm/693963

okay, godt det virker :-)