Ребята помогите пожалуйста решить задачку в программе Дельфи

Тема в разделе "Delphi - FAQ", создана пользователем Aleksey4878, 7 июл 2008.

  1. Aleksey4878

    Aleksey4878 Гость

    Ребят пожалуйста кто нибудь помогите решить задачку это зависит мое будущее :rolleyes: "Нужно построить домик в программе Дельфи". Не могу понять как это делается, но пожалуйста помогите кто нибудь!!!
     
  2. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    ага , а патом пойдут

    - посади дерево
    - выарсти сына....


    IF не переименуете тему в более понятную AND не опишете детально что надо THEN тему удалю
     
  3. Aleksey4878

    Aleksey4878 Гость

    Просто нарисовать нужно средствами Дельфи домик и все, а вот как не знаю
     
  4. etc

    etc Гость

    Тут нужен холст, мальберт и краски, и все получится.
     
  5. Aleksey4878

    Aleksey4878 Гость

    Ну дак ни кто не поможет((((( как всегда(((
     
  6. etc

    etc Гость

    Дык эта, а как вам помочь? За вас написать? Или подсказать, так непонятно что вам непонятно, да и непонятно, что такое "нарисовать", "домик".
    А просто нарисовать вам уже подсказали
    Холст - TCanvas, в любом проявлении
    Краски - TColor
    Мальберт - TPen, TBrush, + руки.ехе
    все, всего достаточно.
     
  7. Aleksey4878

    Aleksey4878 Гость

    Да да написать программный код и все больше ни чего не надо
     
  8. etc

    etc Гость

    Aleksey4878 Ага, а мне надо много много денег, и все больше ничего, все остальное я куплю, дайте пожалста, оч прошу.

    Вот вам домик, правда без окон и дверей:
    Код (Text):
    procedure TForm1.FormPaint(Sender: TObject);
    begin
    self.Canvas.MoveTo(300, 300);
    self.Canvas.LineTo(300, 200);
    self.Canvas.LineTo(400, 200);
    self.Canvas.LineTo(400, 300);
    self.Canvas.LineTo(300, 300);
    self.Canvas.MoveTo(300, 250);
    self.Canvas.LineTo(250, 250);
    self.Canvas.LineTo(350, 150);
    self.Canvas.LineTo(450, 250);
    self.Canvas.LineTo(400, 250);
    end;
     
  9. Aleksey4878

    Aleksey4878 Гость

    Спасибо вам большое вы мне очень помогли!!
     
Загрузка...

Поделиться этой страницей