Forum: Multimedia
Delphi
by KB-Selbst,
19. Feb 2010
Wenn, dann so:
const c_Err1 = 'Die Schiffe dürfen sich nicht überlagern bzw. nebeneinander sein.';
x_hilf:=X div 25; y_hilf:=Y div 25; // Das mit den vielen Befehlen in einer Zeile stört mich jetzt weniger.
xs:=x_hilf*25; ys:=y_hilf*25;
if (xs+laenge>250) or (if ys+hoehe>250)
then
Forum: Multimedia
Delphi
by KB-Selbst,
19. Feb 2010
Naja, jetzt postest du die Verbesserungen. Dann können wir weiter sehen.
Und nicht vergessen: Die Formatierung des Sourcecodes sollte dringend angepasst werden.
Im übrigen bin auch ich der Meinung: Das Verwenden eines eigenen Arrays wie hier mehrfach erwähnt bringt erhebliche Vorteile gegenüber deiner jetzigen Version.
Forum: Multimedia
Delphi
by KB-Selbst,
19. Feb 2010
Ich rate dringend von so einer Formatierung ab.
Es ist aus dem äußerden Bild, das durch die Formatierung vorgegeben wird, nicht ersichtlich, dass die For-Schleife mit Laufvariable H den kompletten Rest des Posting beinhaltet. Das erschwert die Fehlersuche erheblich. Warum befindet sich denn in keiner der Abfragen eine der Laufvariablen der For-Schleifen?