[es] - DBGrid row color

ik0
Ivan Cekov
Information System Developer
Planning Authority Malta
Floriana, Malta

Član broj: 222385
Poruke: 158
95.180.189.*

+3 Profil

DBGrid row color

^{22.06.2010. u 11:32 - pre 168 meseci}

Kako "izboiti" kolone pritom da se dobije nesta slicno na ovaj efekt

Kao i po obicaju puno koda za Delphi nikud za c++...jer ovaj kod uradi nesta slicno kao na slici

Code:

procedure TGridForm.DBGridDrawColumnCell(
   Sender: TObject;
   const Rect: TRect;
   DataCol: Integer;
   Column: TColumn;
   State: TGridDrawState) ;
var
   grid : TDBGrid;
   row : integer;
begin
   grid := sender as TDBGrid;

   row := grid.DataSource.DataSet.RecNo;

   if Odd(row) then
     grid.Canvas.Brush.Color := clSilver
   else
     grid.Canvas.Brush.Color := clDkGray;

   grid.DefaultDrawColumnCell(Rect, DataCol, Column, State) ;

end; (* DBGrid OnDrawColumnCell *)

Ako je to to jer moze neko samo da mi prevede kako bi to bilu u bcb...Hvala

Kude tumbe i tri bandere

Odgovor na temu

ik0
Ivan Cekov
Information System Developer
Planning Authority Malta
Floriana, Malta

Član broj: 222385
Poruke: 158
95.180.189.*

+3 Profil

Re: DBGrid row color

^{23.06.2010. u 10:50 - pre 168 meseci}

Jer to nemoguce u c++ ili niko neke da mi odgovori :)

Kude tumbe i tri bandere

Odgovor na temu

X Files
Vladimir Stefanovic
Pozarevac

SuperModerator
Član broj: 15100
Poruke: 4902
212.200.65.*

Jabber: xfiles@elitesecurity.org

+638 Profil

Re: DBGrid row color

^{23.06.2010. u 11:09 - pre 168 meseci}

Citat:

Jer to nemoguce u c++ ili niko neke da mi odgovori :)

Nije nemoguce, naravno. Potrudi se malo i sam, recimo:
http://codenewsfast.com/
KEYWORDS: DBGrid row different color
... i na kraju ces lako modifikovati kod, koji je ionako cist VCL, tako da je konverzija trivijalna.

Code:

void __fastcall TForm1::DBGrid1DrawColumnCell(TObject *Sender,
      const TRect &Rect, int DataCol, TColumn *Column,
      TGridDrawState State)
{
        if ( DBGrid1->DataSource->DataSet->RecNo % 2 )
                DBGrid1->Canvas->Brush->Color = clSilver;
        else
                DBGrid1->Canvas->Brush->Color = clDkGray;

        DBGrid1->DefaultDrawColumnCell( Rect, DataCol, Column, State );
}

... mada ima u ovom kodu jos nekih elemenata koje bi trebalo doterati, ali to je druga prica.

Odgovor na temu

ik0
Ivan Cekov
Information System Developer
Planning Authority Malta
Floriana, Malta

Član broj: 222385
Poruke: 158
95.180.189.*

+3 Profil

Re: DBGrid row color

^{23.06.2010. u 12:08 - pre 168 meseci}

Da znam kljucne reci trazi o bi....to je sve sto sam mogo da najdem po netu :( Hvala ti u svakom slucaju

Kude tumbe i tri bandere

Odgovor na temu