StringGrind - kolor linii

[shycat]

Witam, uzywam komponentu StringGrind, "kolorystyka" programu jest raczej ciemna i chcialabym, aby komponent "pasowal" do koloru reszty... ale nie moge zmienic koloru linii, zostaja one caly czas biale... screen przesylam w zalaczniku do postu. Jak zmienic kolory tych linii?

[Cyfrowy Baron]

Niestety standardowy komponent StringGrid nie udostępnia metod umożłiwiajacych zmianę koloru linii. możesz je co najwyżej całkowicie usunąć, czyli będą ale niewidoczne.

[shycat]

Chyba nie bede miala wyboru, dzieki Cyfrowy Baronie

[Miroo_007]

Można to obejść rysując ręcznie linię. Pokażę to na przykładzie:

Kod: Zaznacz cały

void TForm1::StringGrid1DrawCell(...) {
    for(int i=0, int x=0, int y=0; i < StringGrid1->RowCount; i++, y+=StringGrid1->RowWidth[i]) {
          StringGrid1->Canvas->Pen->Width = 3;
          StringGrid1->Canvas->Pen->Color = clBlack;
          StringGrid1->Canvas->MoveTo(x, y+1);
          StringGrid1->Canvas->LineTo(StringGrid1->Width, y+1);
    }
}

Rysowanie pionowych lini należy wykonać analogicznie.Aby zapobiec migotaniu grida należy przy tworzeniu formularza wpisać:

Kod: Zaznacz cały

StringGrid1->DoubleBuffered = true;

P.S. Nie wiem czy kod zadziała bo nie jestem wstanie teraz tego sprawdzić, tzn. kod pisany na kartce papieru.

[Cyfrowy Baron]

Umieszczanie pętli w zdarzeniu OnDrawCell jest najgorszym z możliwych rozwiązań, obiekt będzie "migał", a przy dużej liczbie komórek po prostu będzie się zacinał.
Zauważ że to zdarzenie zawiera jako argument klasę TRect zwracającą pozycję i wymiary każdej komórki, więc tym należy się posłużyć:

Kod: Zaznacz cały

void __fastcall TViewForm::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
StringGrid1->Canvas->Pen->Color = clRed;
StringGrid1->Canvas->Pen->Width = 1;

StringGrid1->Canvas->MoveTo(Rect.left - 1, Rect.top);
StringGrid1->Canvas->LineTo(Rect.left - 1, Rect.bottom - 1);


StringGrid1->Canvas->MoveTo(Rect.left - 1, Rect.bottom - 1);
StringGrid1->Canvas->LineTo(Rect.right, Rect.bottom - 1);
}
//---------------------------------------------------------------------------


Ten kod można oczywiście udoskonalić i posłużyć się np. zamiast funkcjami MoveTo LineTo jedna funkcją Rectangle. Pamiętać należy jednak o jednym odrysowywanie odbywa się wewnątrz komórek a nie na ich krawędzi, więc trzeba wyłączyć wyświetlanie linii.

Nigdy nie umieszczaj pętli wewnątrz zdarzenia OnDrawCell jeżeli nie jest to absolutnie niezbędne.