Stringgrid Felder bei Formcreate färben

[Lucifer]

Hallo

Also ich hatte vor ein kleines Spiel zu schreiben.
In einer Multidimensionellen Array ist die Map eingetragen
Auf 0 kann man gehen auf -1 nicht.

Nun wollte ich dass wenn das Spiel startet (also form.create) dass alle Felder mit 0 als Inhalt Grün gefärbt werden und alle mit -1 Rot.

Ich hab schon 2 stunden dran gesessen und hab auch schon genug gegoogelt nur find ich nicht wirklich eine passende Lösung.

[mkinzler]

Nicht beim Erzeugen der Form, sondern beim Zeichnen (OwnerDraw; onDrawCell)

[Lucifer]

ok das hab ich zwar auch versucht

aber irgendwie läuft bei mir etwas schief

Delphi-Quellcode:

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var i,j:integer;
begin


  for i:=0 to 9 do
  begin
    for j:=0 to 9 do
    begin
      form1.stringgrid1.Cells[i,j]:=IntToStr(map[i,j]);
      if(map[i,j]=-1)then
      begin
        stringgrid1.Canvas.Brush.Color:=clred;
        stringgrid1.Canvas.FillRect(Rect);
      end
      else
      begin
        stringgrid1.Canvas.Brush.Color:=clgreen;
        stringgrid1.Canvas.FillRect(Rect);
      end;
    end;
  end;




end;

wenn ich das somache kommt ein komisches resultat raus.
Ich hab echt keine Ahnung wie ich es anstellen soll.

[toms]

Du brauchst keine Schleife.
Das OnDrawCell Ereignis wird schon für jede Zelle aufgerufen, welche neu gezeichnet werden soll.

[Lucifer]

oh wie dumm -.-

Also es läuft jetzt

Nur es sieht bisschen unschön aus.
Durch das ganze geOnDrawed sieht man überall linien.

Kann man das irgendwie umgehen ausschalten oder sonst was?

[mkinzler]

Was für Linien?

[Lucifer]

also sieht so aus wenn eine szene dauernd neugezeichnet werden würde
man kann es nicht screenshoten.

Sieht aber hässlich aus.


Und noch eine kleine Nebenfrage:
Man sieht ja auf dem Stringgrid auf welcher Zelle man sich grade befindet(Nicht Focus sonder gestrischelte Kiste).
Kann man das auch irgendwie wegschaffen?

[mkinzler]

Zitat:

Man sieht ja auf dem Stringgrid auf welcher Zelle man sich grade befindet(Nicht Focus sonder gestrischelte Kiste).

Im Parameter State
Ist DefaultDrawing aktiv?

[Lucifer]

also es kommen diese Linien weil ich in die Stringgrid die -1 0 und 2(für die position des Spielers) hineinschreibe.
Das scheint Die Stringgrid nicht zu mögen.

Wie genau stelle ich das mit dem State ein?

[mkinzler]

Das ist nichts zum Einstellen, sondern sagt dir ob, die aktuell gezeichnete Zelle markiert ist.