LS DialogBox - noCancel ... gute Idee, aaaaber ...

[Dr.Domino]

Hallo,
ich habe gerade eine kleine Herausforderung mit der DialogBox ...

Hintergrund ist: bei Anlegen eines neuen Doc in einer DB wird als erstes eine DiaglogBox geöffnet, die einen Wert abfragt ... kein Wert -> kein Dokument :-).

Mit noCancel kriegt man ja schon mal elegant den Cancel-Button weg - nur dummerweise gibt's ja auch noch dieses Kreuz, mit dem man das Fenster schließen kann.

Gibt's einen eleganten Weg, dieses auch ins Nirvana zu schicken? Oder bleibt nur der Weg, zu prüfen, ob trotz noCancel doch gecancelt wurde und so das Anlegen des Dokuments zu verweigern?

VG,
Markus

[pram]

Cancel-Button ausbauen find ich "doof". 
Es ist nicht gerade Benutzerfreundlich, wenn ich zu einer Eingabe gezwungen werde.

Das Abfragen des Rückgabewertes finde ich eindeutig die bessere Lösung.

Gruß
Roland

[Dr.Domino]

Hallo Roland,

kann ich nachvollziehen ... habe allerdings das Problem, daß ich das gerade nicht gebacken kriegen ...

Die DialogBox wird im PostOpen der Form erstellt - und ich schaffe es irgendwie nicht, das "Cancel" derart zu verdrahten, daß der Prozeß anhält.

doc.Remove(True) oder uidoc.Close

brigen mich nicht weiter...

Suche ich an der falschen Stelle?

[pram]

Woran scheitert es genau?
Aus dem Stegreif hätte ich jetzt gesagt, deine Methode muss irgendwie so aussehen:

Sub postopen...
  ret = workspace.dialogbox(...)
  if not ret then
    ' User hat cancel gedrückt
    uidoc.document.SaveOptions = "0" ' Dialog "Wollen sie speichern" deaktivieren
    call uidoc.close(true)
    exit sub
  end if
  ... Mach den Rest des Prozesses
end sub

ggf. musst im queryClose auch noch auf SaveOptions="0" prüfen, falls du da Code drin hast.

Gruß
Roland

[Dr.Domino]

Uh .. ah ... shame on me .... mann sollte halt nicht das exit sub vergessen  

Danke für den Anstoß!