Sådan får du flere RBG-farveværdier til Delphi

I Delphi, TColor-typen specificerer farven på et objekt. Det bruges af farveegenskaber for mange komponenter og af andre egenskaber, der specificerer farveværdier.

Grafik-enheden indeholder definitioner af nyttige konstanter til TColor. For eksempel clBlue-kort til blå, clRed-kort til rødt.

Du kan specificere TColor som en 4-byte hexadecimalt antal i stedet for at bruge de konstanter, der er defineret i grafik-enheden. De lave tre bytes repræsenterer RGB (rød, grøn, blå) farveintensitet for henholdsvis blå, grøn og rød. Bemærk inversionen fra en typisk hexfarve: For TColor er sekvensen blå-grøn-rød.

For eksempel kan rød defineres som TColor ($ 0000FF).

Hvis du har værdier for rød, grøn og blå intensitet (et tal fra 0 til 255 - "byte" -type), skal du her få vist TColor-værdien:

Var r, g, b: Byte; farve: TColor; begynde r: = StrToInt (ledRed. Tekst); g: = StrToInt (ledGreen. Tekst); b: = StrToInt (ledBlue. Tekst); farve: = RGB (r, g, b); Shape1.Brush. Farve: = farve; ende; 

"LedRed", "ledGreen" og "ledBlue" er tre redigeringskontroller, der bruges til at specificere intensiteten af ​​hver farvekomponent. Shape1 er en TShape Delphi-kontrol.

Delphi tip navigator:
»Sådan analyseres TAB-afgrænsede filer i Delphi
«IsDirectoryEmpty - Delphi-funktion til at bestemme, om en mappe er tom (ingen filer, ingen undermapper)