Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by st18061974,
27. Sep 2003
procedure TForm1.listeDrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
var left,top:integer;
begin
if (acol=6) and (arow=1) then
begin
left:=rect.right-14;
top:=rect.bottom-16;
liste.Canvas.Brush.Color:=clred;
liste.Canvas.Ellipse(left,top,left+10,top+10);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by st18061974,
27. Sep 2003
Jo, alles supi. Soll ich mal den Code bringen?
Danke
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by st18061974,
27. Sep 2003
Icxh dachte eher an sowas wie TCanvas.DrawPoint, ich weiß eben nur nicht wie ich das anstellen soll.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by st18061974,
27. Sep 2003
Hi,
Ich möchte in einem Stringgrid in dem schon ein Text drin steht ein zeichen voranstellen. Nämlich soll in dieser Zelle vor den Text ein grüner oder roter Punkt. Ich habe keine Ahnung wo ich da anfangen soll. Geht das überhaupt und wenn ja, wäre ich für jeden no so kleinen Tip dankbar.
Ach so, es muß ein Stringgrid sein, da es sich um ein Prog handelt was schon seit längerem arbeitet und...