Помогите с графикой

[tagjik]

Здравствуйте, нужно нарисовать на canvas'e какую-нить фигуру в нормальных размерах, например, Рыбку, Машину, Самолёт, короче нарисовать что-нить, помогите пожалуйста, если есть уже готовые исходники поделитесь пожалуйста

[SERG1980]

procedure TForm2.Button1Click(Sender: TObject);
var MyBitMap:TBitMap;
begin
 MyBitMap:=TBitMap.Create;
 MyBitMap.LoadFromFile('d:\рыбка.bmp');//указываем путь к картинке
 form2.Canvas.Draw(10,10,MyBitMap);
 //или Image1.Canvas.Draw(10,10,MyBitMap); если рисуешь на имидже
 MyBitMap.Free;
end;

[mutabor]

Тебе именно нарисовать или картинку из файла вывести на экран?

[tagjik]

именно нарисовать, не bmp, не имэйдж

[SERG1980]

У канвы есть методы отрисовки круга овала линий ломанной линии прямоугольника изучай их и вперёд, но это геморно