Forum: Object-Pascal / Delphi-Language
Delphi
by zorakh,
13. Okt 2008
Weiß niemand warum das den Programmablauf stoppt?
Forum: Object-Pascal / Delphi-Language
Delphi
by zorakh,
13. Okt 2008
Zusätlich zum manuell auslösen gibt es noch ein Problem.
Nämlich werden alle Ereignisse blockiert. Ich habe:
procedure TForm1.TabelleDrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
with TStringGrid(Sender).Canvas do begin
if (ACol=0) and (ARow=0) then begin
If Colormod='clwhite' then
Brush.Color:=clwhite
Forum: Object-Pascal / Delphi-Language
Delphi
by zorakh,
13. Okt 2008
Udn wie löse ich das Ereigniss manuell aus?
Stringgrid1.OnDrawCell geht nciht. Nicht genug Parameter
Forum: Object-Pascal / Delphi-Language
Delphi
by zorakh,
13. Okt 2008
In dem Link konnte ich jetzt die Antwort auf meine beiden Fragen(Der Post über diesem) leider auch nciht erspähen?!
Kann mir dazu jemand noch etwas sagen?
Forum: Object-Pascal / Delphi-Language
Delphi
by zorakh,
13. Okt 2008
Wann findet denn dieses Ereigniss immer statt?
Weil es nützt mir wiegsagt ncihts, wenn das nur einmal passiert.
Außerdem noch nebenbei;
Wenn sich das Ereigniss jetzt ein 2. mal mit anderen Koordinaten ausführen würde wäre dann die 1,1 Zelle wieder weiß? nein oder?
Forum: Object-Pascal / Delphi-Language
Delphi
by zorakh,
13. Okt 2008
Ich habe ein StringGrid und möchte gerne einzele Zellen einfärben. Ich will das ganze letzendlich so einbauen, dass ich eine Funktion bekomme nach diesem Schema:
ColorCell(StringGrid1,1,1,clred);
Ich muss halt im Programmablauf die Zellen farbig unterlegen.
Ich habe das hier als Beispiel gefunden:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect:...