Moin
ich lese so den Farbwert eines Pixels aus:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
Var Pt:TPoint;
DC:HDC;
begin
GetCursorPos(Pt);
DC:=CreateDC('
DISPLAY',
NIL,
NIL,
NIL);
label1.Caption := inttostr(GetPixel(
DC,Pt.x,Pt.y));
End;
Als Ergebniss kommt eine Zahl wie diese: 54875874
Wie kann ich diese Zahl in
RGB-Werte aufteilen
und in die Internet-Farbwerte, z.B. #ff9e03?
Hab grad die ganze CL abgeklappert, ehrlich...