Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CenBells,
25. Sep 2004
hi,
probier mal vor jedes Canvas noch dein Stringgrid zu schreiben
procedure StringGrid1.DrawCell(Sender: TObject; Acol, ARow : Integer;
Rect:TRect; State:TGridDrawState);
begin
if Acol = 4 then
begin
DeinGrid.Canvas.Pen.Color:=clblack;
DeinGrid.Canvas.Pen.eidth:=3;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CenBells,
25. Sep 2004
hi,
es gibt ein event onDrawCell oder so ähnlich. Da kannst du dann bestimmen, wie die zellen gemalt werden und an deiner vorgesehenen stelle den rand dicker machen.
ich habe hier mal nen code, der in einem kalendar (oben waren die tage) die spalte des aktuellen tag dick eingerahmt hat. (links und rechts dick)
if Acol > 0 then
if EncodeDate(FYear, FMonth, ACol) = Date then...