Hallo taaktaak,
wie wird der transparente Farbton für das Auswahlquadrat umgesetzt?
Ist das eine Form mit entsprechendem Alphablend.Value und liegt diese
über dem FScanImage?
Ich ermittel einen Farbwert folgendermaßen:
Delphi-Quellcode:
...
{ Private-Deklarationen }
Farbwert: hDC;
...
Farbwert:= GetDC(0); //DesktopColor
...
Var myColorValue : TColor;
myColorValue := GetPixel(Farbwert, Pos.X, Pos.Y);
...
Das funktioniert ganz nach dem Motto -> WYSIWYG
(auch unter Vista)
//EDIT: Code-Beispiel angefügt...