Bitte helfen: WIeos setzt er hier nur 8 stadt 9 feldern?

[shmia]

Ich nehme mal an, du willst Tic-Tac-Toe spielen.
Wahrscheinlich ist das Property .Tag deiner Images immer auf 0 gesetzt, aber das ist nur eine
Vermutung.

Delphi-Quellcode:

// dein alter Code
tmp := IntToStr( senderImage.Tag ); 
  if ( length( tmp ) > 1 ) then begin 
    pX := StrToInt( copy( tmp, 1, 1 ) ); 
    pY := StrToInt( copy( tmp, 2, 1 ) ); 
  end 
  else begin 
    pX := 0; 
    pY := StrToInt( tmp ); 
  end; 

// hier der vereinfachte Code
// die Koordinaten werden einfach & sauber aus dem .Tag geholt
  pX := senderImage.Tag mod 10;
  pY := senderImage.Tag div 10;
// ganz wichtig: Koordinaten prüfen
  Assert((pX >= 0) and (pX < 3), 'pX out of Range' );
  Assert((pY >= 0) and (pY < 3), 'pY out of Range' );