[Delphi] rysowanie w dbgridzie

Odpowiedz Nowy wątek
slaw998
2003-01-22 15:53
slaw998
0

heloł

ponawiam swoje pytanie

jak rysować w dbgridzie - jedno z pól jest typu logical (boolean)
w celi tego pola ma się pojawiać nie wartość logiczna t/f ale np. kolor czerwony jeśli true, zielony jeśli false - jeśli ktoś mi może pomóc
dzięki bardzo

[cya]

Pozostało 580 znaków

2003-01-22 16:57

Rejestracja: 17 lat temu

Ostatnio: 1 rok temu

0

ponawiam swoje pytanie

Staraj się tego unikać. Jeżeli nikt nie odpowiedział to znaczy to, że:

  1. nikt nie wie
  2. temat jest tak często powtarzany, że ludziom się znudziło odpowiadać (wtedy Szukaj)

Najwyraźniej nikt nie wie...


Life is just a dream, you know...
[Cowboy Bebop]

Pozostało 580 znaków

2003-01-23 19:48

Rejestracja: 17 lat temu

Ostatnio: 4 lata temu

0

DefaultDrawing zmień na false

A W onDrawColumnCell wpisz:

with dbgrid1.Canvas do
begin
FillRect(Rect);
dbgrid1.DefaultDrawColumnCell(Rect, DataCol,Column, State);
IF Datacol = tu numer kolumny w której masz Logical Then
Begin
Brush.Color:= ClGreen ;
// TextOut(Rect.Left+1, Rect.Top+1, 'negatywny');
IF Tablejakastam.FieldByName('Wynik').AsBoolean = True then
Begin
Brush.Color:= ClRed;
// TextOut(Rect.Left+1, Rect.Top+1, 'pozytywny');
End;
FillRect(Rect);
End;
End;

czy jakoś tak, chwilowo nie mam możliwości sprawdzić.

Pozostało 580 znaków

Odpowiedz

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0