Forum: Object-Pascal / Delphi-Language
Delphi
by HolgerCW,
8. Nov 2007
Das war mir klar,
dachte nur das auch eine Funktion gibt, der ich die Spalten übergeben kann.
Hat sich aber erledigt, da es ja eigentlich keinen Sinn macht.
Gruss und nochmal danke.
Holger
Forum: Object-Pascal / Delphi-Language
Delphi
by HolgerCW,
8. Nov 2007
Ist X = Spalte und Y = Zeile ?
... weil habe ja mit MousetoCell die Spalten und ZEilen herrausgesucht
Gruss
Holger
Forum: Object-Pascal / Delphi-Language
Delphi
by HolgerCW,
8. Nov 2007
Alles klar,
das habe ich auch schon gemacht. Und wie bekomme ich dann die Farbe ausgelesen ?
STGrid.Color;
ist ja für das ganze Grid, und
Forum: Object-Pascal / Delphi-Language
Delphi
by HolgerCW,
8. Nov 2007
Hmmm,
Ok, das ist mir nun alles klar.
Jetzt habe ich mein Grid gezeichnet. In Zelle (1,1) ist nun die Farbe clInfoBK.
Wie kann ich jetzt im MouseMove - Ereignis auslesen, wenn ich über die Zelle (1,1) fahre, das diese clInfoBk ist ?
Gruss
Forum: Object-Pascal / Delphi-Language
Delphi
by HolgerCW,
8. Nov 2007
Alles klar,
würde ich hiermit den Text der Zelle zuweisen, oder nur rein zeichnen ?
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
var s: string;
R: TRect;
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by HolgerCW,
8. Nov 2007
Ok,
ich habe nun in Spalte 0, Zeile 0 eine Index = 'Test' geschrieben.
Wenn ich nun mit:
Canvas.Brush.Color := clInfoBK;
Canvas.FillRect(Rect);
Canvas.TextOut(Rect.Left+2, Rect.Top+2, Cells);
Forum: Object-Pascal / Delphi-Language
Delphi
by HolgerCW,
8. Nov 2007
Hallo zusammen,
ich möchte wenn das Grid gezeichnet wird auch die Zellen dementsprechend mit Text füllen.
wenn ich im Ereignis onDrawCell folgendes mache:
Canvas.Brush.Color := clInfoBK;
Canvas.FillRect(Rect);
Cells := 'Test'; // <- Das bringt die Zelle zum flackern