Colors/fi

│ Deutsch (de) │ English (en) │ español (es) │ suomi (fi) │ français (fr) │ 日本語 (ja) │ русский (ru) │ 中文（中国大陆） (zh_CN) │

Värit

LCL:ssä TColor on vakiovärityyppi. Se on yhteensopiva Delphin TColorin kanssa. TColor voi edustaa joko RGB (3x8bit) arvoa tai järjestelmän väriä kuten clDefault. LCL voi toimia myös fpImage-järjestelmän kanssa, joka käyttää TFPColor-tyyppiä (joka on RGBA (4x16bit), ei RGB (3x8bit) kuten TColor).

Muunnokset TColor- ja RGB-arvojen välillä

käännösyksikkö (eli unit)Graphics tarjoaa seuraavat toiminnot:

function Blue(rgb: TColor): BYTE; // does not work on system color
function Green(rgb: TColor): BYTE; // does not work on system color
function Red(rgb: TColor): BYTE; // does not work on system color
function RGBToColor(R, G, B: Byte): TColor;
procedure RedGreenBlue(rgb: TColor; out Red, Green, Blue: Byte); // does not work on system color
function FPColorToTColor(const FPColor: TFPColor): TColor;
function TColorToFPColor(const c: TColor): TFPColor; // does not work on system color
function IsSysColor(AColor: TColorRef): Boolean;

TColor:n muunto merkkijonoksi ja päinvastoin

Seuraavat funktiot muuntaa merkkijonot kuten "25500", "$AA0088" tai "clNavy" TColoriksi:

• StringToColor
• StringToColorDef

Voit muuntaa TColorin arvon merkkijonoksi kuten "clNavy" tai "$AA0002":

• ColorToString

Muunna TColor HTML-merkkijonoksi #rrggbb

Katso koodi kohdasta Convert color to/from HTML.

Taulukko vakioväreistä

Tarjotaan noin 20 ennalta määritettyä värivakiota, jotka ovat Delphi-yhteensopivia:

Värivakio	Merkitys	Heksadesimaalinen arvo käytettäväksi TColor:n kanssa	Esimerkki
clBlack	Black	TColor($000000);
clMaroon	Maroon	TColor($000080);
clGreen	Green	TColor($008000);
clOlive	Olive Green	TColor($008080);
clNavy	Navy Blue	TColor($800000);
clPurple	Purple	TColor($800080);
clTeal	Teal	TColor($808000);
clGray	Grey	TColor($808080);
clSilver	Silver	TColor($C0C0C0);
clRed	Red	TColor($0000FF);
clLime	Lime Green	TColor($00FF00);
clYellow	Yellow	TColor($00FFFF);
clBlue	Blue	TColor($FF0000);
clFuchsia	Fuchsia	TColor($FF00FF);
clAqua	Aqua	TColor($FFFF00);
clLtGray	Light Grey	TColor($C0C0C0);	clSilver alias
clDkGray	Dark Grey	TColor($808080);	clGray alias
clWhite	White	TColor($FFFFFF);
clCream	Cream	TColor($F0FBFF);	Lazarus 1.2 ja uudemmat
clMedGray	Medium Grey	TColor($A4A0A0);	Lazarus 1.2 ja uudemmat
clMoneyGreen	Mint Green	TColor($C0DCC0);	Lazarus 1.2 ja uudemmat
clSkyBlue	Sky Blue	TColor($F0CAA6);	Lazarus 1.2 ja uudemmat

Järjestelmän värit

Esimerkki: clInfoBk, clInfoText

Järjestelmävärit ovat värivakioita, joilla on erityinen merkitys. Niiden todellinen arvo riippuu kontekstista ja teemasta. Ne eivät ole yksinkertaisia ​​värejä. Esimerkiksi clInfoBk:

Form1.Canvas.Brush.Color:=clInfoBk;  // // käytä vihje-ikkunan oletustaustaväriä
Form1.Canvas.FillRect(10,10,50,50);

Vihje-ikkunassa MS Windowsissa voi olla valkoinen tausta, joten yllä oleva piirtää valkoisella. Linuxissa / gtk2: ssa se voi olla metallinen tekstuuri, joten yllä oleva kuvioi kyseisellä tekstuurilla. Jos haluat laittaa tekstiä tähän, tarvitset vastaavan värin kuin clInfoText, muuten teksti voi olla käyttäjän kannalta lukukelvoton. Esimerkiksi:

Form1.Canvas.Brush.Color:=clInfoBk;  // käytä vihje-ikkunan oletustaustaväriä
Form1.Canvas.FillRect(10,10,50,50);
Form1.Canvas.Font.Color:=clInfoText;  // käytä vihjeikkunan oletustekstiväriä
Form1.Canvas.TextOut(10,10,'Hint');

Järjestelmän väriä clInfoBk ei voi käyttää Pen.Color:lla eikä Font.Color:lla. Jos näin tehdään, tulos on määrittelemätön ja riippuu widgetet- ja käyttäjäteemasta. Sama koskee myös väriä clInfoText: Sitä voidaan käyttää vain Font.Color:na. Sen käyttö Brush.Color:na ei ehkä toimi. Tällä hetkellä kaikki widgetit sallivat sen käytön myös Pen.Color:na.

Teeman muutokset

Kun käyttäjä vaihtaa teeman, järjestelmän värit muuttuvat. Väri clInfoBk saattaa muuttua valkoisesta siniseksi tai yhtenäisestä väristä tekstuuriksi. Tämä muutos tapahtuu, kun jaat uuden Brush Handle. Muista, että yksinkertainen tehtävä Brush.Color:=clInfoBk ei jaa Brush Handle. Brush Handle on jaettu käyttöön. Esimerkiksi:

Form1.Canvas.Brush.Color:=clInfoBk; // tämä ei luo uutta brush handle:a
Form1.Canvas.FillRect(10,10,50,50); // tämä luo brush handletällä hetkellä aktiivisen teeman brush vihjeikkunoita varten
...
...
// jos teema muuttuu niin tällä hetkellä Brush.Handle on edelleen varattu vanhojen arvojen kanssa
...
Form1.Canvas.FillRect(10,10,50,50); // tämä maalaa vanhan teeman brush:lla
Form1.Canvas.Brush.Color:=clInfoBk; // vanhan arvon liittäminen ei luo uutta brush handle:a
Form1.Canvas.FillRect(10,10,50,50); // tämä maalaa vanhan teeman brush:lla
Form1.Canvas.Brush.Color:=clRed;    // uuden värin määrittäminen, vanha Handle ei kelpaa
Form1.Canvas.Brush.Color:=clInfoBk; // uuden värin määrittäminen, vanha Handle ei kelpaa
Form1.Canvas.FillRect(10,10,50,50); // tämä luo uuden handlen ja maalaa uuden teeman avulla

Taulukko järjestelmän väreistä

Seuraavassa taulukossa luetellaan järjestelmän värit ja niiden merkitys. Niiden käyttäminen määritelmän soveltamisalan ulkopuolella on määrittelemätön ja tulos riippuu widgetetistä ja teemasta. Esimerkiksi clDefault on normaali taustaväri on käytetyn laitteen taustakuvio. Jos halutaan maalata painikkeita omilla mukautetuilla ohjaimilla, käytä yksikön Themes piirustusfunktioita.

Vakio	LCL määrittely	Delphi huomiot	Tuetut Widgetsets
clNone	Ilmaisee "ei piirretä". Sen käyttäminen kontrollin värinä on määrittelemätön. kontrolli ei tule läpinäkyväksi.	-	kaikki
clDefault	Käyttämällä sitä Brush-värinä niin käytetään tavallisen device context (DC, laitteen konteksti) normaalia taustaväriä Lomakkeen canvas:ssa FillRect maalaa suorakulmaisen alueen, joka on täynnä normaalin ikkunan normaalia taustaa. Tämä on mitä widgetset ja teema määrittelevät. Tämä voi olla harmaa, liukuväri tai kuva. Käyttämällä clDefault TListBoxin canvasiin niin maalataan se normaalilla taustalla, joka on yleensä valkoinen Windowsissa. Joten TListBox clDefault on sama kuin clWindow. Käyttämällä sitä Pen color:na niin se on laitteeen oletusarvoinen viivan väri. Käyttämällä sitä Font color:na niin se on laitteeen oletusarvoinen tekstin väri.	-	kaikki
clScrollBar	Vierityspalkin (Scrollbar) runko	-	kaikki
clBackground	Työpöydän taustaväri	-	kaikki
clActiveCaption	Aktiivinen ikkunan otsikkorivi	-	ei mikään
clInactiveCaption	Ei-aktiivinen ikkunan otsikkorivi	-	ei mikään
clMenu	vakio valikkokohdan taustaväri	-	ei mikään
clWindow	Valitsemattoman tekstin normaali taustaväri. Määritetty kontrolleille, kuten TEdit, TComboBox, TMemo, TListBox, TTreeView.	-	ei mikään
clWindowFrame	Kehyksen väri ikkunan ympärillä	-	ei mikään
clMenuText	Fontin väri, jota käytetään yhdessä clMenu:n kanssa	-	ei mikään
clWindowText	Fontin väri, jota käytetään yhdessä clWindow:n kanssa	-	ei mikään
clCaptionText	Aktiivisen ikkunan otsikkorivin tekstin väri	-	ei mikään
clActiveBorder	?	-	ei mikään
clInactiveBorder	?	-	ei mikään
clAppWorkspace	MDIMain lomakkeen taustaväri	-	ei mikään
clHighlight	brush color kun elementti on valittu	-	ei mikään
clHighlightText	Font color kun teksti on valittu (käytetään clHighligh kanssa).	-	ei mikään
clBtnFace	Painikkeen taustaväri	-	ei mikään
clBtnShadow	Painikkeen varjostusväri (Bottom Right) käytetään 3D-efektin saavuttamiseen	-	ei mikään
clGrayText	font color kielletyillä elementeillä	-	ei mikään
clBtnText	Painikkeen font color käytetään clBtnFace:n kanssa	-	ei mikään
clInactiveCaptionText	Ei-aktiivinen ikkunan otsikkorivin tekstin väri	-	ei mikään
clBtnHighlight	BPainikkeen korostusväri (Top Left) käytetään 3D-efektin saavuttamiseen	-	ei mikään
cl3DDkShadow	?	-	ei mikään
cl3DLight	?	-	ei mikään
clInfoText	Vihjeiden fontin väri. Käytä yhdessä clInfoBk:n kanssa	-	kaikki
clInfoBk	Brush väri vihjeitä varten. Käytä yhdessä clInfoText:n kanssa	-	kaikki
clHotLight	?	-	ei mikään
clGradientActiveCaption	Toinen väri, jota käytetään aktiivisen ikkunan otsikkorivin gradientin tekemiseen	-	ei mikään
clGradientInactiveCaption	Toinen väri, jota käytetään ei-aktiivisen ikkunan otsikkorivin gradientin tekemiseen	-	ei mikään
clMenuHighlight	Valitun valikkokohdan taustaväri	-	ei mikään
clMenuBar	Valikkokohdan taustaväri	-	ei mikään
clForm	?	-	ei mikään
clColorDesktop	?	-	ei mikään
cl3DFace	?	-	ei mikään
cl3DShadow	?	-	ei mikään
cl3DHiLight	?	-	ei mikään
clBtnHiLight	Sama kuin clBtnHighlight	-	ei mikään

Järjestelmävärin rgb-arvojen löytäminen

Käytä funktiota ColorToRGB (in unit Graphics ) järjestelmän värin rgb-komponenttien määrittämiseksi. Tämä funktio havaitsee, onko väri värijärjestelmä, ja jos tämän arvo on true, näyttää palauttaa järjestelmän värin teeman värissä. Palautettu Longint voidaan ymmärtää tavalliseksi väriksi:

// Tässä esimerkissä on TColorBox lomakkeellaa ja käyttää tämän OnChange-käsittelijää 
procedure TForm1.ColorBox1Change(Sender: TObject);
var
  c: TColor;
begin
  c := ColorToRGB(ColorBox1.Selected);
  Caption := Format('R%d G%d B%d', [Red(c), Green(c), Blue(c)]);
end;

Piirrä teeman elementtejä mukautetuissa ohjauksissa (custom controls)

Käännösyksikkö (unit) Themes tarjoaa funktioita, joilla piirretään standardinhallinnan yksittäisiä elementtejä. Esimerkiksi piirtomerkin piirtäminen kuten TTreeView käyttää seuraavaa koodia:

uses Themes;

...

procedure TYourCustomControl.Paint;
const
  PlusMinusDetail: array[Boolean {Hot}, Boolean {Expanded}] of TThemedTreeview =
  (
    (ttGlyphClosed, ttGlyphOpened),
    (ttHotGlyphClosed, ttHotGlyphOpened)
  );
var
  Details: TThemedElementDetails;
  R: TRect;
  Collapse: boolean;
begin
  ...
  //draw a themed expand sign.
  Details := ThemeServices.GetElementDetails(PlusMinusDetail[False, Collapse]);
  R := Rect(ALeft, ATop, ARight + 1, ABottom + 1);
  ThemeServices.DrawElement(Canvas.Handle, Details, R, nil);
  ...
end;