AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Zum verzweifeln- Farbe in den Cells

Offene Frage von "zorakh"
Ein Thema von zorakh · begonnen am 13. Okt 2008 · letzter Beitrag vom 14. Okt 2008
Antwort Antwort
Seite 1 von 2  1 2   
zorakh

Registriert seit: 12. Okt 2008
21 Beiträge
 
#1

Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 20:47
Es klappt einfach cniht. Eingentlich will ich nur alle Felder meines Grids per Schleife rot färben.
über dieses Prinzip, aber es klappt einfahc nciht. Es färbt sich rein garnichts.
Woran kann das liegen?
Delphi-Quellcode:
for x:=0 to (max-1) do begin
for y:=0 to (max-1) do begin
  ColCords:=x;
  RowCords:=y;
  StringGrid1.repaint;
end;
end;

Und dann bei OnDraw Cells

procedure TForm1.TabelleDrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  with TStringGrid(Sender).Canvas do begin
       if (ACol=ColCords) and (ARow=ColCords) then begin
          Brush.Color:= clRed;
          FillRect(Rect);
       end;
  end;
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.828 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 20:51
Ist OwnerDraw aktiv?
Markus Kinzler
  Mit Zitat antworten Zitat
zorakh

Registriert seit: 12. Okt 2008
21 Beiträge
 
#3

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 20:57
"
Tut mir Leid. Ich weiß garnicht was Owner-Draw ist, Was müsste ich denn da machen?
btw: Wenn ich ColCords und RowCords auf 1 setze(in FormCreate) dann bekomme ich mein rotes Feld bei 1,1.
Aber mit der Schleife geht snciht. Klingt sehr danach, als obe es an repaint hängen würde oder?
"
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.828 Beiträge
 
Delphi 10.4 Sydney
 
#4

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 21:17
Wo befindet sich der Code mit den Schleifen?
Markus Kinzler
  Mit Zitat antworten Zitat
zorakh

Registriert seit: 12. Okt 2008
21 Beiträge
 
#5

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 21:21
Alles in der selben Unit

Delphi-Quellcode:
procedure TForm1.ShowData;
var x,y:integer;
begin
for x:=0 to (feldmase-1) do begin
for y:=0 to (feldmase-1) do begin
  ColCor:=x;
  RowCor:=y;
  Tabelle.repaint;
end;
end;
end;
und die wird bei einem Timer aufgerufen
Tabelle ist das StringGrid feldmase ist das max
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.828 Beiträge
 
Delphi 10.4 Sydney
 
#6

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 21:23
Rufe sie mal testweise einmalig auf
Markus Kinzler
  Mit Zitat antworten Zitat
zorakh

Registriert seit: 12. Okt 2008
21 Beiträge
 
#7

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 21:24
Genau das selbe. Es passiert leider garnichts
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.828 Beiträge
 
Delphi 10.4 Sydney
 
#8

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 21:26
Bei mir funktioniert es. Wo hast du ColCor und RowCor deklariert?
Markus Kinzler
  Mit Zitat antworten Zitat
zorakh

Registriert seit: 12. Okt 2008
21 Beiträge
 
#9

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 21:27
Global.
Kannst du vielleicht einfach deinen komplette Code hierrein kopieren?
Dann kann ich mal vergleichen
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.828 Beiträge
 
Delphi 10.4 Sydney
 
#10

Re: Zum verzweifeln- Farbe in den Cells

  Alt 13. Okt 2008, 21:33
Was hast du eigentlich vor?
Markus Kinzler
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:21 Uhr.
Powered by vBulletin® Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf