[nik-petrenko]

Здравствуйте, товарищи знатоки! Вопрос в следующем: необходимо создать форму по шаблону.
Нашел урок по этому http://fictionbook.ru/author/aleksan...ne.html?page=2

но ничего не получается. Ругается на это:

Создание региона для области отсечения формы

Код:

procedure TfrmTemplate.FormCreate(Sender: TObject);
var
pict: TPicture;
begin
//Загрузка изображения и создание региона (считаем, что
//цвет фона – белый)
pict := TPicture.Create;
pict.LoadFromFile('back.bmp');
SetWindowRgn(Handle, RegionFromPicture(pict, RGB(255,255,255)),
True);
end;

Админ: Пользуемся тегами для оформления кода!

может что-то надо дописать в коде. прошу прощения за тупость. и заранее благодарен

[Bargest]

Ругается на это:

На это - это на что именно?

[Страдалецъ]

А вы функцию RegionFromPicture включили в проект?
Там кстати, когда вставите функцию в проект, замените в функции минусы. Там будет другой символ вместо минуса, хотя выглядит он так-же.

[nik-petrenko]

Сообщение от Bargest

На это - это на что именно?

ругается на то, что в коде подчеркнуто.

Сообщение от Страдалецъ

Там будет другой символ вместо минуса

а что за символ? если не минус?

[angvelem]

Сообщение от nik-petrenko

а что за символ? если не минус?

"Длинный" минус.

[nik-petrenko]

основная загвоздка остается в том, что не хочет принимать FormCreate и Handle.
Вроде, код дан уже готовый из урока, что по ссылке, значит ошибки быть не должно. что нужно еще дописать???

[angvelem]

А как была создана процедура FormCreate, ручками написана или как положено, кликом в Инспекторе объектов?

[nik-petrenko]

Сообщение от angvelem

А как была создана процедура FormCreate, ручками написана или как положено, кликом в Инспекторе объектов?

ручками корявенькими прописано)

[nik-petrenko]

и вообще, как можно форму создать через инспектор объектов? она ж создается из файл\новая форма

[angvelem]

Ну и что же Вы хотите? У Вас эта процедура не прописалась ни в классе, ни в DFM. Удаляйте и создавайте как положено, потом впишете только нужный для работы код.
Причём тут форма, события вы создаёте через Object inspector.

[nik-petrenko]

ошибка гласит "'Unit1'does not contain a member named 'FormCreate' "

хотя как я понял обязательное указание

Код:

 type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);

присутствует

[angvelem]

Порядок действия:
1. Создаём новую форму.
2. В Object inspector-е кликаем закладку Events.
3. Правее надписи OnCreate, дважды кликаем мышкой.
4. В появившемся коде в юните, вписываем нужный код.

[nik-petrenko]

Сообщение от angvelem

Порядок действия:
1. Создаём новую форму.
2. В Object inspector-е кликаем закладку Events.
3. Правее надписи OnCreate, дважды кликаем мышкой.
4. В появившемся коде в юните, вписываем нужный код.

Это уже разобрался. но в коде все та же ошибка.

[angvelem]

Кидай свой проект (архив без exe-шника).

[nik-petrenko]

вот Projects.rar