Grafika w StringGrid

[anastazy]

Witam!
Potrzebuję wyswietlić dane w formie "arkusza kalkulacyjnego". Problem w tym, że muszę to przedstawić na tle z okreslonycm obrazem (bmp). Są to dane procesu technologicznego. Ponieważ danych jest trochę (6 kolumn po 8 wierszy) zrobiłem to w StringGridzie. Niesety nie wiem jak "podłożyć obraz pod ten obiekt. Nie chodzi tu o wypełnienie 1 komórki, tylko całego obszaru wyświetlania danych... Może jakiś inny sposób?

Pozdrawiam!
Astek

[Corvis]

Na szybko przychodzi mi do głowy, zrobić to na TListView i tam wstawić obrazek jako tło. Jak to zrobić opisane jest tutaj:

http://www.delphi3000.com/articles/article_4245.asp?SK=

[Cyfrowy Baron]

Można wypełnić tabelę tłem, ale tylko obszar na którym znajdują się komórki:

plik nagłówkowy:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

private:
        Graphics::TBitmap *Wallpaper;

plik źródłowy

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
 Wallpaper = new Graphics::TBitmap;
 Wallpaper->LoadFromFile("c:\\image.bmp");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol, int ARow,
          TRect &Rect, TGridDrawState State) /* Zdarzenie OnDrawCell */
{
 /* warunek pomija komórki nagłówka */
 if(ACol > 0 && ARow > 0)
 {
  StringGrid1->Canvas->CopyRect(Rect, Wallpaper->Canvas, Rect); // wypełnienie komórek tłem

  //ponowne wypełnienie komórek tekstem
  StringGrid1->Canvas->Brush->Style = bsClear;
  String Text = StringGrid1->Cells[ACol][ARow];
  int j = (Rect.Bottom - Rect.Top - StringGrid1->Canvas->TextHeight(Text))/2;

  StringGrid1->Canvas->TextOut(Rect.Left + 2, Rect.Top + j, Text);
 }
}
//---------------------------------------------------------------------------
 

Otrzymamy coś takiego:

stringgrid.png

Obszaru poza komórkami nie da się wypełnić, gdyż klasa TStringGrid nie umożliwia dostępu do tego obszaru.

[anastazy]

Dziękuję serdecznie - właśnie takiego rozwiązania szukałem...

Pozdrawiam!
Astek