Fehlermeldung bei GetSaveFileName

[Board00]

Ich hab mal wieder ein Problemchen :hells:

Und zwar, wenn ich die Funktion GetSaveFileName aufrufe bekomme ich folgenden Fehler:



Die MessageBox hab ich eingebaut um den kryptischen Fehlercode in einen besseren Fehlertext zu konvertieren:

void MeldeFehler(DWORD Fehlercode)
{
	LPVOID lpMsgBuf;
			
	FormatMessage(  FORMAT_MESSAGE_ALLOCATE_BUFFER | 							FORMAT_MESSAGE_FROM_SYSTEM | 							        FORMAT_MESSAGE_IGNORE_INSERTS,
				NULL,
				Fehlercode,
				MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
				(LPTSTR) &lpMsgBuf,
				0,
				NULL 
				);
				MessageBox( NULL, (LPCTSTR)lpMsgBuf, "Error", MB_OK | MB_ICONINFORMATION );
				// Free the buffer.
				LocalFree( lpMsgBuf );
}

Jetzt kommt mein Aufruf:

//Dialog zum Speichern aufrufen
   DateiMenue.lpstrFile = Programminfo.Datei.FileName;
   if(GetSaveFileName(&DateiMenue))
   {
      FehlerVar = DateiSpeichern(&Programminfo,DateiMenue,&BlockSpeicherHandle,&VerdrahtungsListenHandle);
      if (FehlerVar != ok)
      {
            FehlerMeldung(FehlerVar,&Programminfo,0);
            Programminfo.Datei.gespeichert = FALSE;
	    return 0;
      }
      else
           Programminfo.Datei.gespeichert = TRUE;
       }
       else
       {
	MeldeFehler(CommDlgExtendedError());
       }

Bei der roten Zeile lasse ich mir den Fehler ausgeben und der lautet, wie auf dem Bild zu sehen: Die Adresse des Steuerblocks ist ungültig. Hat jemand eine Idee woran das liegt?

Danke.