Thema
:
Delphi
Hänge bei units und umsetzung fest
Einzelnen Beitrag anzeigen
bitsetter
Registriert seit: 17. Jan 2007
1.169 Beiträge
Turbo Delphi für Win32
#
6
Re: Hänge bei units und umsetzung fest
5. Feb 2008, 11:35
Hallo,
was machst du denn da?
zusammenfalten
·
markieren
Delphi-Quellcode:
procedure
Tfenster_frm.limit_radiobtnClick(Sender: TObject);
var
limit : integer;
begin
IF
limit_radiobtn.Checked = true
THEN
limit := StrToInt(limit_edt.Text);
{wenn der Code hier nicht ausgeführt wurde dann
ist die Variable 'limit' möglicherweise nicht initialisiert worden}
IF
limit = punkte_2
THEN
ShowMessage('
Winner ist (game2_edt.Text)
')
ELSE
IF
limit = punkte_1
THEN
ShowMessage('
Winner ist (game1_edt.Text)
')
ELSE
END
;
//<-- hier ist die Prozedur schon zu Ende
Else
.
//was soll denn der Punkt hier bringen?
END
;
limit := 0;
end
.
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
Zitat
bitsetter
Öffentliches Profil ansehen
Mehr Beiträge von bitsetter finden