ich werd mal drüber nachdenken. Aber ersteinmal muss ich glaube ich mal frische Luft schnappen. Danke schonmal.
so, jetzt wollen wir doch mal schauen...
sollen x und y jeweils die position des aktuell angewählten spielfeldes sein?
dx und dy die Begrenzung für 2.?
soll ich 1. mit if-formeln machen? womit sonst? for-schleifen? und vor allem was soll ich da schreiben?
ojeojeojeojeoje
so in etwa?
Delphi-Quellcode:
x:=spielfeld.Row;
y:=spielfeld.Col;
label1.Caption:=IntToStr(x);
label2.Caption:=IntToStr(y);
if feld [(x+1),y]<>dransein then begin
if feld [(x+2),y]<>dransein then begin
if feld [(x+3),y]<>dransein then begin
if feld [(x+4),y]<>dransein then begin
if feld [(x+5),y]<>dransein then begin
if feld [(x+6),y]=dransein then begin
zahl:=zahl+6;
wie kann ich die function pruefen eigentlichg einbauen?
etwa so?
label3.Caption:=IntToStr(pruefen);