Naja, also ich hab folgenden Code.
Delphi-Quellcode:
var map: Array[0..6,0..6] of Integer;
x, y: Integer;
begin
for x := 0 to 6 do
for y := 0 to 6 do begin
Map[x,y] := 0;
if Map[x,y] = 0 then
Image1.Canvas.Draw(x*32,y*32, Image2.Picture.Bitmap);
end;
end;
Also hab ich quasi 32*32 Große kästen 6 Waagerecht und
6 Senkrecht. Nun möchte ich anzeigen auf welchem 32*32
Großen Kasten der Mauscursor sich befindet.
Also 1 Waagrecht, 2 Senkrecht