![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
|
Задача вот в чем - В Delphi 7 хочу нарисовать прямоугольник.Создал проект, файл proba1.pas.В Object Inspector установил свойства Form1:
Capition- Proba,Name - Form1,Height - 500,Width - 600,Top - 100,Left - 200. В окне кода в шаблоне в разделе implementation после (&R*.dfm) ввожу метод Form1.Canvas.Rectangle(250,250,350,350); При компиляции или проверки (Syntax check) выдает: [Error]prob1.pas(26)Declaretion expected but indentifier 'Form1' found. Объясните чайнику - что неверно? |
|
#2
|
||||
|
||||
|
А вот так тебе не подойдёт:
Код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
public
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Canvas.Rectangle(250,250,350,350);
end;
end. |
|
#3
|
||||
|
||||
|
Это произошло из-за того, что после implementation начинается исполняемая часть, и вней описываются подпрограммы, которые были объявленны в интерфейсной части, и другие объекты, а ты ка я понял, написал Form1.Canvas.Rectangle(250, 250, 350, 350) просто так, не в каком-нибудь методе, а этого делать нельзя.
|
|
#4
|
||||
|
||||
|
Yurk@-у : Спасибо!Такой код компилируется, правда при запуске в окне
формы пока не вижу прямоуголника.Наверное надо установить свойства Pen и Brush? |
|
#5
|
||||
|
||||
|
Сделай в событии OnPaint.
|
|
#6
|
||||
|
||||
|
Согласен!
Спасибо за корект! |
|
#7
|
||||
|
||||
|
Цитата:
|
|
#8
|
||||
|
||||
|
Зайди во вкладку События (Events) у формы, и там два раза щелкни на OnPaint.
Последний раз редактировалось The Shadow, 03.11.2007 в 14:33. |
|
#9
|
||||
|
||||
|
Есть квадрат!Всем спасибо.Будем грызть дальше.
|
|
#10
|
||||
|
||||
|
Будут вопросы - обращайся!
|
|
#11
|
||||
|
||||
|
Где-то есть описание на рус. панели инструментов Delphi 7?
|
|
#12
|
||||
|
||||
|
Да есть описание основных компонентов в книге Михаила фленова "Библия дельфи"
http://www.programmersclub.ru/book По этой ссылке найдешь Библию дельфи и много полезных книг по дельфи |