Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ModalResult übernimmt keinen übergabewert (https://www.delphipraxis.net/39207-modalresult-uebernimmt-keinen-uebergabewert.html)

ibp 30. Jan 2005 13:50


ModalResult übernimmt keinen übergabewert
 
Hallo,

wenn ich einer Modalen Form einen eigenen ModalResult übergebe, z.B. ModalResult:=2005 dann ist vor der übergabe der wert 2005 und danach von dem aufrufenden code der modalresult=3 :shock: obwohl in der oh steht, dass man neben den vordefinierten werten alle intgerwerte übergeben kann! und nun?

FriFra 30. Jan 2005 18:55

Re: ModalResult übernimmt keinen übergabewert
 
Hast Du mal geprüft, ob dem entspr. Button wirklich kein Modalresult im Objektexplorer zugeordnet wurde?

ibp 30. Jan 2005 19:34

Re: ModalResult übernimmt keinen übergabewert
 
ich habe nix über einen button geschrieben, sonder über ein formular!

FriFra 30. Jan 2005 19:43

Re: ModalResult übernimmt keinen übergabewert
 
Ja, wie schliesst Du denn das Formular?

Wenn Du es über einen Button schliesst, kannst Du diesem Button deine Zehl als ModalResult geben (im Objektexplorer). Oder die machst es im onClose des Forms, was IMHO allerdings ziemlich sinnlos wäre, da damit alle Results möglicher Buttons überschrieben würden...

ibp 30. Jan 2005 20:51

Re: ModalResult übernimmt keinen übergabewert
 
geschlossen wird mit...
Delphi-Quellcode:
ModalResult:=2004
self.close;

alcaeus 30. Jan 2005 21:00

Re: ModalResult übernimmt keinen übergabewert
 
Hallo ibp,

lass mal das close weg. Das Setzen von ModalResult loest von alleine das Schliessen des Forms aus. Wenn du hingegen Close aufrufst, dann wird alles so behandelt, als ob der Benutzer auf einen OK-Button geklickt hat.

Greetz
alcaeus


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:29 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz