AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Stringgridzelle einfärben aber den Text beibehalten
Thema durchsuchen
Ansicht
Themen-Optionen

Stringgridzelle einfärben aber den Text beibehalten

Ein Thema von R34DM3 · begonnen am 13. Feb 2008 · letzter Beitrag vom 13. Feb 2008
Antwort Antwort
Benutzerbild von R34DM3
R34DM3

Registriert seit: 6. Feb 2008
10 Beiträge
 
#1

Stringgridzelle einfärben aber den Text beibehalten

  Alt 13. Feb 2008, 18:50
moin!
hab da ein problem
und bis jetzt habe ich nicht wirklich eine passende antwort per search im forum gefunden -.-

und zwar:
ich habe ein stringgrid in das im laufe des programms texte geschrieben werden - eine
art tagebuch - nun wird bei buttonklick eine bestimmte zelle bearbeitet
und der auftrag der darin stand "beendet" an dieser stelle kommt mein problem
ich würde diese zeile gerne einfärben.
habs mit on drawcell etc versucht und son paar sachen zu onbuttonclick ereignissen
gefunden doch fehlt mir das wissen um die sachen so zu verändern dass es is meinem prog
auch funzt

hier mal kurz ein beispiel zum problem:

Timer - schreibe in reihe x 'text'; x + 1;

buttonclick - inputbox(...,...,aktuelleReihe) -> aktuelleReihe soll eingefärbt werden

mfg markus
blub
  Mit Zitat antworten Zitat
taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#2

Re: Stringgridzelle einfärben aber den Text beibehalten

  Alt 13. Feb 2008, 19:12
Moin, Moin,
das OnDraw-Event ist schon der richtige Ansatzpunkt. Da gibt's doch unzählige Beispiele, wie man Zellen einfärbt. Einfach noch mal suchen, du wirst mit Sicherheit etwas passendes finden...
Ralph
  Mit Zitat antworten Zitat
bluesbear

Registriert seit: 14. Dez 2005
Ort: Hahnstätten
355 Beiträge
 
Delphi 2007 Enterprise
 
#3

Re: Stringgridzelle einfärben aber den Text beibehalten

  Alt 13. Feb 2008, 19:52
ungefähr so gehts:
Delphi-Quellcode:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; Col, Row: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  if Row=3 then begin
    StringGrid1.Canvas.Brush.Color := clSilver;
    StringGrid1.Canvas.FillRect(Rect);
    StringGrid1.Canvas.Textout(Rect.Left, Rect.Top, StringGrid1.Cells[Col, Row]);
  end;
end;
Klaus M. Hoffmann
  Mit Zitat antworten Zitat
taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#4

Re: Stringgridzelle einfärben aber den Text beibehalten

  Alt 13. Feb 2008, 20:05
Jooo, aber bedenke, dass hier auch gezeichnet wird, wenn der Focus auf der Zelle/Zeile ist - auch das muss der Anwender jetzt selber erledigen...
Ralph
  Mit Zitat antworten Zitat
bluesbear

Registriert seit: 14. Dez 2005
Ort: Hahnstätten
355 Beiträge
 
Delphi 2007 Enterprise
 
#5

Re: Stringgridzelle einfärben aber den Text beibehalten

  Alt 13. Feb 2008, 20:25
Zitat von taaktaak:
Jooo, aber bedenke (...)
joh, deshalb steht da "ungefähr". Mit dem Beispiel sieht man schon mal was. Manchmal soll die Färbung ja auch bleiben, auch wenn das die aktive Zelle ist, oder so. K.a. was da gewünscht ist...
Klaus M. Hoffmann
  Mit Zitat antworten Zitat
taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#6

Re: Stringgridzelle einfärben aber den Text beibehalten

  Alt 13. Feb 2008, 20:34
Hallo Bluesbear,
das ist als zusätzlcher Hinweis für R34DM3 gedacht und sollte in KEINER Weise eine Kritik in deine Richtung sein! Ich habe das "ungefähr" schon erkannt
Ralph
  Mit Zitat antworten Zitat
Antwort Antwort


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 15:46 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz