Keresés
Hírlevél
 
Kiemelt témák
»Hogy viszonyul ehhez a család?
»Legjobb metodika emberi relációk tárolására
»A programozó hibája, hogy törik a programját?
»Jogosultság kezelés mezőszinten
Állás/munka
»Wordpress szakértőt keresünk
»Kamu álláshirdetők listája
»Front-end fejlesztő / Sitebuilder
»DataStore Developer
»PHP programozó, webfejlesztő munkát keres
» több téma
Tudástár
Oldalon keresés 8x írja ki az eredményt
?XML-ből sok szövegmező
?Input mezőből visszakapott adat probléma
TinyMCE és az ékezetek
?Rengeteg hasonló kép betöltése gyorsan (PHP)
Ékezetes kar. nem minden táblában jól
?Shelltreeview gond
Grafikon rajzolás probléma
?Onclick= php függvény
?Egyenes megrajzolása
?Access-ből adott xml fájl kinyerése
Listázás időpont szerint
Exportálás változó könyvtárba
*Link eredményének kiolvasása
Imagemapre képet
» több téma
Társalgó
»A programozásból jól meg lehet élni?
»MFC tanulás
»Könyvet adok-veszek
»Hogy viszonyul ehhez a család?
»Nintendo wii
»Letölthető az új Rad Studio XE és Delphi XE
»Weblap véleményezés
»Játékmotor elmélet
»Informatikai bulvárlap
»Delphi-ről C++-ra váltás
» több téma
ASP  |  C#  |  C++  |  CSS  |  Delphi  |  Flash  |  HTML  |  Java  |  JavaScript  |  Pascal  |  Perl  |  PHP  |  Python  |  Visual Basic  |  Visual C++  |    »    

Tudástár

»

TGridPanel - adott rész színének megváltoztatása.

»

TGridPanel - adott rész színének megváltoztatása.

nyitotta: gfxfunclub, idő: 2010.03.09., moderátor: netangel
  Értesítés változás esetén Felvétel kedvencekhez Küldés emailben Nyomtatható verzió

Kategóriák:Programozási nyelvek » Delphi

Sorrend:
Időzóna:
Blokkméret:
Helló!
A kérdésem:
Lehetséges-e delphiben azt megoldani, hogy egy TGridPanel színét nem teljes mértékben, hanem csupán egy megadott arányban színezzem át?
pl.: csak 100 pixel szélességben legyen más a színe.
Legjobb az lenne, ha megadott oszlop-ig lehetséges lenne a szín megváltoztatása.
Köszi előre is!
Persze. Nézd meg az OnPaint metódusát, abban lehet.
Próbálom - próbálom, de ha tudnál egy rövid kódot írni ehhez megköszönném!

procedure TForm1.FormCreate(Sender: TObject);
var
c: Tcanvas;
begin
c:=Tcanvas.Create;
c.Brush.Color:=clred;
gridpanel1.ParentColor:=false;
gridpanel1.PaintTo(c,100,100);
end;

Itt van ahol most tartok, nem tudom miért nem lesz látható eredmény.
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin

end;
Itt megkapod, hogy melyik cellát rajzolja éppen (oszlop(ACol)és sor(ARow)) valamint a Rect-ben az éppen rajzolt cella koordinátáit.

Egy kis példa:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  if not (gdFixed in state) then
    StringGrid1.Canvas.Brush.color:=clRed
  else
    StringGrid1.Canvas.Brush.color:=clBtnFace;
  Rect.Right:=rect.Right-10;
  StringGrid1.Canvas.FillRect(Rect);
end;
Köszi a hozzászólást, de TGridpanel-ről van szó és nem TStringGrid-ről, de amit írtál az jó csak sajna nem segít rajtam. Azért kössz mégegyszer!
A TGridpanellnek, ha lenne canvas-a akkor nem lenne kérdés...
Valami ilyesmi kellene működjön.

procedure TForm1.FormCreate(Sender: TObject);
var
  Gridpanel1_Canvas: TCanvas;
begin
  Gridpanel1_Canvas:=Tcanvas.Create;
  Gridpanel1_Canvas.Handle := GetDC( gridpanel1.Handle );
  ...
  itt rajzolhatsz a canvasra
  ...
  ReleaseDC( gridpanel1.Handle, Gridpanel_Canvas.Handle );
  Gridpanel1_Canvas.Free;
end;
Teljesen igazad van! Köszönöm a segítséget!
Na ezt tényleg jól benéztem!
Belépés
E-mail cím:
Jelszó:

RSS források
-Hírek
-Cikkek
-Fórumok
-Állás/munka
Top pontgyűjtők
»Micu1.030
»Interlock280
»mezofi150
»Pitta_100
»Frostech0100
»szbzs.2100
»Riha60
»Akhiles50
»mrchandra50
»Bakter50
Top wikieditorok
»Sting
»Doi
»FlamingClaw
»Argathron
»Csaboka2
»Vodka
»Joexy
»Ivn
»Balucinho
»Kelemzol
» ugrás a wikire
A nap kifejezései
»Algoritmus
»Hogyan kezdjem el
»Perl
» ugrás a wikire
Hírek
»Megérkezett a PostgreSQL 9.0 kiadásra jelölt változata
»Letölthető az új Rad Studio XE és Delphi XE
»Function-X digitális művészeti találkozó és demoscene party
»Webfejlesztőknek szóló közösségi oldalt indított a Microsoft
»Letölthető a hardvergyorsított Chrome 7 első fejlesztői kiadása
» több hír
PC Fórum hírek
»Itt az első kép az AMD nyolcmagos processzoráról
»"Szuperdizájnos" érintő-egeret mutatott be a Microsoft
»Szabadalmaztatta a számítógép kikapcsolását a Microsoft
»Vírusriadót váltott ki a webezőknél a Google
»Ingyen iWiW-ezhetnek mobiljaikról a T-Mobile-osok
»Automatikusan kiválogatja legfontosabb leveleink a Google
»OOo4Kids - ingyenes Office csomag gyerekeknek
»Új, gyorsabb Core i3 és Pentium processzorokat jelentett be az Intel
Tagi blogok
»PSP
»Első Programozó
»USB
»PHP, mint sablonmotor egyszerűen