AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Fläche mit Farbe ausfüllen

Ein Thema von HTML04 · begonnen am 21. Nov 2007 · letzter Beitrag vom 22. Nov 2007
Antwort Antwort
Benutzerbild von HTML04
HTML04

Registriert seit: 31. Okt 2007
Ort: Dülmen
48 Beiträge
 
RAD-Studio 2009 Arc
 
#1

Fläche mit Farbe ausfüllen

  Alt 21. Nov 2007, 14:49
Ich möchte eine mit Canvas gezeichnete Fläche, die mit unterschiedlichen Linien begrenzt ist mit einer Farbe ausfüllen.
Ich habe brush versucht aber ohne feste Form geht es dabei nicht. Bei Floodfill tut sich bei mir rein gar nichts. Wie geht es sonst? Und wenn es mit Floodfill geht, wie???
Rutten Raus!!!
  Mit Zitat antworten Zitat
Progman

Registriert seit: 31. Aug 2007
Ort: 99974 MHL
695 Beiträge
 
Delphi 10.1 Berlin Starter
 
#2

Re: Fläche mit Farbe ausfüllen

  Alt 21. Nov 2007, 14:54
  Canvas.FloodFill(x,y,istColor,fsSurface); Wobei x und y den Punkt beschreiben, von dem aus gefüllt werden soll, istColor (Typ TColor) enthält die Farbe der Fläche, die gefüllt werden soll. Gefüllt wird mit der Farbe, die in Canvas.Brush.Color festgelegt wird.
Karl-Heinz
Populanten von Domizilen mit fragiler, transparenter Aussenstruktur sollten sich von der Translation von gegen Deformierung resistenter Materie distanzieren!
(Wer im Glashaus sitzt sollte nicht mit Steinen werfen)
  Mit Zitat antworten Zitat
Benutzerbild von HTML04
HTML04

Registriert seit: 31. Okt 2007
Ort: Dülmen
48 Beiträge
 
RAD-Studio 2009 Arc
 
#3

Re: Fläche mit Farbe ausfüllen

  Alt 21. Nov 2007, 15:29
Doch aus irgendeinem Grund klappt dieses einfach nicht bei mir??????
Rutten Raus!!!
  Mit Zitat antworten Zitat
Progman

Registriert seit: 31. Aug 2007
Ort: 99974 MHL
695 Beiträge
 
Delphi 10.1 Berlin Starter
 
#4

Re: Fläche mit Farbe ausfüllen

  Alt 21. Nov 2007, 15:41
hier komplette Unit, die Form.Canvas füllt:
Delphi-Quellcode:
unit testUnit5;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, XiButton;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    //
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var x, y: Integer;
begin
  Canvas.Brush.Color:=clYellow;
  X:=30; y:=30;
  Canvas.FloodFill(x,y,Canvas.Pixels[x,y],fsSurface);
end;

end.
Bei mir funzt das, und das müsste auf jedem Canvas gehen.
Karl-Heinz
Populanten von Domizilen mit fragiler, transparenter Aussenstruktur sollten sich von der Translation von gegen Deformierung resistenter Materie distanzieren!
(Wer im Glashaus sitzt sollte nicht mit Steinen werfen)
  Mit Zitat antworten Zitat
Benutzerbild von HTML04
HTML04

Registriert seit: 31. Okt 2007
Ort: Dülmen
48 Beiträge
 
RAD-Studio 2009 Arc
 
#5

Re: Fläche mit Farbe ausfüllen

  Alt 21. Nov 2007, 15:48
Bei mir funktioniert es nun auch. Gibt es auch eine die Bei der Grenze aufhört auszfüllen und nicht über die Grenze die Fläche befüllt, denn wenn man mehrere Flächen mit einer Farbe hat füllt diese methode alles?
Rutten Raus!!!
  Mit Zitat antworten Zitat
Progman

Registriert seit: 31. Aug 2007
Ort: 99974 MHL
695 Beiträge
 
Delphi 10.1 Berlin Starter
 
#6

Re: Fläche mit Farbe ausfüllen

  Alt 21. Nov 2007, 15:50
Die Flächen müssen schon getrennt sein, mind. durch eine 1px breite Linie, oder man gibt jeder Fläche ne etwas andere Farbe.
Karl-Heinz
Populanten von Domizilen mit fragiler, transparenter Aussenstruktur sollten sich von der Translation von gegen Deformierung resistenter Materie distanzieren!
(Wer im Glashaus sitzt sollte nicht mit Steinen werfen)
  Mit Zitat antworten Zitat
Benutzerbild von HTML04
HTML04

Registriert seit: 31. Okt 2007
Ort: Dülmen
48 Beiträge
 
RAD-Studio 2009 Arc
 
#7

Re: Fläche mit Farbe ausfüllen

  Alt 21. Nov 2007, 21:22
ich werd ma' schaun ob ichs hinbekomme ...
Trotzdem danke für deine Mühe
Rutten Raus!!!
  Mit Zitat antworten Zitat
Benutzerbild von Deep-Sea
Deep-Sea

Registriert seit: 17. Jan 2007
907 Beiträge
 
Delphi XE2 Professional
 
#8

Re: Fläche mit Farbe ausfüllen

  Alt 22. Nov 2007, 07:36
Zitat von HTML04:
Gibt es auch eine die Bei der Grenze aufhört auszfüllen und nicht über die Grenze die Fläche befüllt, denn wenn man mehrere Flächen mit einer Farbe hat füllt diese methode alles?
Wie wäre es da mit TCanvas.FillRect ?! ...
Bzw.: Was ist bei dir "die Grenze der Fläche"?
Chris
  Mit Zitat antworten Zitat
Benutzerbild von HTML04
HTML04

Registriert seit: 31. Okt 2007
Ort: Dülmen
48 Beiträge
 
RAD-Studio 2009 Arc
 
#9

Re: Fläche mit Farbe ausfüllen

  Alt 22. Nov 2007, 15:35
ist leider keine rechteckige fläche
Rutten Raus!!!
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:48 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz