Graph.dcu??

kan du ikke bare have et if loop til at sætte farven ind i rgb(r,g,b)?

type
 tfarve=record
  r,g,b: byte;
 end;
...
begin
   canvas.brush.color := rgb(farve.r,farve.g,farve.b);
   canvas.fillrect(canvas.clientrect);
end

Jeppe Johansen
Jeppesoftware@hotmail.com

Hvordan sletter man alt hvad der er tegnet i et canvas?

Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------

[Redigeret d. 23/01-05 00:55:04 af Rune Jensen (RoZ)]

Hmm har lidt af et problem..

Når jeg via denne kode:
Canvas.Pen.Color:= TColor(LineColor);

ændrer farven på de streger der tegnes bliver farven en mærkelig farve. Når LineColor (en string) skifter indhold skifter farven også dog bare ikke til den rigtige.

LineColor indeholder en farve: enten Black, Blue, Green, Red, White
Selv hvis jeg sætter cl foran farvenavnet virker det stadig ikke.

Hvad skyldes dette? Og hvordan kan jeg evt. løse det?

Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------

kan du ikke bare have et if loop til at sætte farven ind i rgb(r,g,b)?

Kode 

type
 tfarve=record
  r,g,b: byte;
 end;
...
begin
   canvas.brush.color := rgb(farve.r,farve.g,farve.b);
   canvas.fillrect(canvas.clientrect);
end

Jeppe Johansen
Jeppesoftware@hotmail.com

God ide. Men forstår ikke helt din kode?
Hvad skal jeg lægge farverne ind i?
Hvis det skal gemmes i en string og derefter kaldes fra canvas.brush.color:= enstring had skal jeg så skrive for at lægge farverne i enstring?

Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------

Lavede det på en anden måde istedet.

Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------