Farben zusammenfassen

[delphi_newbie_123]

hallo
gibt es eine möglichkeit
bei einer bedingung mehrere farben zu zusmmen zu fassen

wie zb

Delphi-Quellcode:

 if panel1.color=clred,clblue,clgreen then begin
usw

oder

Delphi-Quellcode:

if panel1.color=clred or clblue or clgreen

hab ales mögliche versucht klappt bei mir irgendwie nicht :/

wäre über einen tipp sehr erfreut danke schomnal

[Mirilin]

:hi:

Du musst Klammern setzen :

Delphi-Quellcode:

if (panel1.color = clred) or (panel1.color = clblue) or (panel1.color = clgreen) then ...

noch ein Link

mfg Tobias

[Sharky]

Hai,

versuche es mal so:

Delphi-Quellcode:

 if Panel1.Color in [clred,clblue,clgreen] then
  begin
    ShowMessage ('Pannel ist farbig');
  end;

[delphi_newbie_123]

oh danke ;) :wall:

[delphi_newbie_123]

hi leute hab folgendes prob :

Delphi-Quellcode:

  ...if DesktopColor(Pos.X, Pos.Y)=($00003FD4) or ($00005FFF)
    or ($00001FD4) or ($00557FD4) or ...
  then 
  begin...

funktioniert komischerweise nicht :/
hat wer eine idee warum?

[CalganX]

Hi,
weil es hier nicht um einen or-Operator, sondern um eine or-Verknüpfung geht. Hier wird also nicht verglichen, sondern zusammen gerechnet. Du musst das genauso, machen, wie Sharky bereits geschrieben hat:

Delphi-Quellcode:

if DesktopColor(Pos.X, Pos.Y) in [$00003FD4,$00005FFF,$00001FD4,$00557FD4] then begin {...}

Chris

[delphi_newbie_123]

:oops: :wall:
danke :love:

[delphi_newbie_123]

if DesktopColor(Pos.X, Pos.Y) in [$00003FD4,$00005FFF,$00001FD4,$00557FD4] then begin {...}

geht leider nicht habs grad probiert geht nur mit clblack clred aber net mit rgb codes
geht nicht durch den compiler :/

[fkerber]

Hi!

Was kommt denn als Fehlermeldung?

Ciao fkerber

[delphi_newbie_123]

die zeile wird einfach rot markiert und geht nicht durch den compiler

Delphi-Quellcode:

if DesktopColor(Pos.X, Pos.Y) in 
[color=crimson][$00003FD4,$00005FFF,$00001FD4,$00557FD4] [/color]
then begin {...}