Графика

← →
Kost © (2003-08-15 22:03) [0]

Как закрасить фигурнапример квадрат через Canvas.Заранее спасибо...

← →
Колобок (2003-08-15 22:10) [1]

Canvas - F1

← →
reticon © (2003-08-15 22:15) [2]

FillRect + F1

← →
Kost © (2003-08-15 22:34) [3]

НАПИШИТЕ ПРОГРАМНЫЙ КОД А НЕ ЧЕРЕЗ Ф1

The following code loads a bitmap from a file and assigns it to the Brush of the Canvas of Form1:

var
Bitmap: TBitmap;
begin
Bitmap := TBitmap.Create;
try
Bitmap.LoadFromFile("MyBitmap.bmp");
Form1.Canvas.Brush.Bitmap := Bitmap;
Form1.Canvas.FillRect(Rect(0,0,100,100));
finally
Form1.Canvas.Brush.Bitmap := nil;
Bitmap.Free;
end;

end;

Графика Найти похожие ветки