Transparenz bei best. Farbe

[Glocke89]

Zitat von freak4fun:

Danke,
hab mal wieder zu kompliziert gedacht und wollte die Farben konvertieren und sonst was, dabei hab ich ja die Farbe vor meiner Nase.

Delphi-Quellcode:

procedure TForm2.FormCreate(Sender: TObject);
var
  lColor: TColor;
begin
  Image1.Picture.Bitmap.Transparent := True;

  TransparentColor := True;
  with Image1 do
    begin
      Left := 0;
      Top := 0;
      Width := 288;
      Height := 288;

      with Picture.Bitmap do
        begin
          LoadFromFile('stable.BMP');
          TransparentColor := Canvas.Pixels[1, 1];
        end;

    end;
end;

MfG
freak

Das Thema hatten wir ja vorhins per ICQ

Das was oben mit Gimp empfohlen wurde, geht auch prima mit Paint




Mal ne blöde Frage: wo ist da im Script die transparente Farbe angegeben? Hab ich etwas überlesen oder so?