x

[pazartesi1]

var
x:Integer;
begin
x:=StrToInt(DBEdit1.Text);
case x of
12: //ne istiyorsan yaz
5: //ne istiyorsan yaz
2544: // den den

[rsimsek]

Bu da ne

Ne başlık var ne soru...