[VisualCLX] Fehler beim beenden meines Programmes

chriss1988 · Beiträge: 389 windows xp prof,home,windows98 delphi5

Einen wunderschönen guten morgen da drausen!

ich habe ein kleine Problem das bestimmt ziemlich einfach zu lösen ist, aber ich komm einfach net drauf deshalb bitte ich euch um hilfe.
wie in der überschrifft schon gesagt geht es darum das programm zu beenden.
hierzu habe ich eine radiogroup, dort stht beenden und wenn man den dan anklickt und auf einen button drück sollte eine showmessage kommen und dan das programm scließen.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure TForm1.Button1Click(Sender: TObject);
begin
case radiogroup1.itemindex of
-1:showmessage('Bitte einen Vorgang Wählen');
0: form2.showmodal;
1: form4.showmodal;
2: form5.showmodal;
3: form1.close + showmessage('Auf Wiedersehn');;
end;

jasocul · Verfasst: Mi 08.02.06 09:32

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TForm1.Button1Click(Sender: TObject);
begin
case radiogroup1.itemindex of
-1:showmessage('Bitte einen Vorgang Wählen');
0: form2.showmodal;
1: form4.showmodal;
2: form5.showmodal;
3: begin
     showmessage('Auf Wiedersehn');
     form1.close;
   end;
end;

chriss1988 · Beiträge: 389 windows xp prof,home,windows98 delphi5

jetzt bringt er mir ausdruck erwartet aber begin gefunden warum das????

chriss1988 · Beiträge: 389 windows xp prof,home,windows98 delphi5

sorry geht doch hab die 3 davor vergessen danke

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme