Result extern zuweisen

**Ben-G**

Hallo!
Ich schreibe für mein Spiel gerade eine eigene Art InputBox. Nun will das der Rückgabewert der Funktion erst festgelegt wenn man in dieser Inputbox auf OK klickt, so wie es bei der Standardversion auch ist.
Wie kann ich das??

**mkinzler**

Welche Funktion? Zeig mal deinen Code?

**Ben-G**

markieren

Code:

			function tform1.Eingabe (Ueberschrift,Frage:String):integer;

begin

form24.Caption:=Ueberschrift;

Form24.Memo1.lines[0]:=frage;

Form24.Spinedit1.Value:=0;

Form24.Show;

end;

Result soll erst nachdem auf einen Button gedrückt wurde ein Ergebnis zugeteilt werden.

**mkinzler**

Form24.ShowModal;

**Ben-G**

Wie jetzt?^^

**Vjay**

Schau dir mal in der Hilfe die Funktion "ShowModal" von "TForm" an.

Oder such mal hier im Forum, dürfte genau das sein, was du suchst.

**mkinzler**

Wenn du eine Form mit .ShowModal statt .Show aufrufst, wartet die Routine bis das Fenster geschlossen wird, dann kannst du den Wert aus dem anderen fenster auslesen und zurückgeben. Den Rückgabewert von .ShowModal kannst du mit ModalResult im anderen Fenster setzen.

**Ben-G**

Vielen Dank, hat prima funktioniert

Result extern zuweisen

Result extern zuweisen

Re: Result extern zuweisen

Re: Result extern zuweisen

Re: Result extern zuweisen

Re: Result extern zuweisen

Re: Result extern zuweisen

Re: Result extern zuweisen

Re: Result extern zuweisen

Forumregeln

Ben-G Registriert seit: 15. Apr 2005 Ort: Wendlingen 55 Beiträge Delphi 7 Personal	#1 Result extern zuweisen 14. Sep 2006, 14:28 Hallo! Ich schreibe für mein Spiel gerade eine eigene Art InputBox. Nun will das der Rückgabewert der Funktion erst festgelegt wenn man in dieser Inputbox auf OK klickt, so wie es bei der Standardversion auch ist. Wie kann ich das??
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#2 Re: Result extern zuweisen 14. Sep 2006, 14:32 Welche Funktion? Zeig mal deinen Code? Markus Kinzler
	Zitat

Ben-G Registriert seit: 15. Apr 2005 Ort: Wendlingen 55 Beiträge Delphi 7 Personal	#3 Re: Result extern zuweisen 14. Sep 2006, 22:39 markieren Code: function tform1.Eingabe (Ueberschrift,Frage:String):integer; begin form24.Caption:=Ueberschrift; Form24.Memo1.lines[0]:=frage; Form24.Spinedit1.Value:=0; Form24.Show; end; Result soll erst nachdem auf einen Button gedrückt wurde ein Ergebnis zugeteilt werden.
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#4 Re: Result extern zuweisen 14. Sep 2006, 22:45 Form24.ShowModal; Markus Kinzler
	Zitat

Ben-G Registriert seit: 15. Apr 2005 Ort: Wendlingen 55 Beiträge Delphi 7 Personal	#5 Re: Result extern zuweisen 15. Sep 2006, 08:46 Wie jetzt?^^
	Zitat

Vjay Registriert seit: 2. Dez 2003 Ort: Berlin/Eschede 481 Beiträge Delphi 7 Professional	#6 Re: Result extern zuweisen 15. Sep 2006, 08:53 Schau dir mal in der Hilfe die Funktion "ShowModal" von "TForm" an. Oder such mal hier im Forum, dürfte genau das sein, was du suchst. Wer später bremst ist eher tot.
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#7 Re: Result extern zuweisen 15. Sep 2006, 10:17 Wenn du eine Form mit .ShowModal statt .Show aufrufst, wartet die Routine bis das Fenster geschlossen wird, dann kannst du den Wert aus dem anderen fenster auslesen und zurückgeben. Den Rückgabewert von .ShowModal kannst du mit ModalResult im anderen Fenster setzen. Markus Kinzler
	Zitat

Ben-G Registriert seit: 15. Apr 2005 Ort: Wendlingen 55 Beiträge Delphi 7 Personal	#8 Re: Result extern zuweisen 15. Sep 2006, 10:21 Vielen Dank, hat prima funktioniert
	Zitat