VPF::Класс - ошибка - Форум программистов

slavonX86

Дата 22.2.2006, 17:47 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 179
Регистрация: 15.12.2005

Репутация: 0
Всего: 0

Когда я пишу СlassXXX.p1 := 100; выдаёт ошибку ! Почему ?

Код


unit Unit2;

interface

uses
  SysUtils, Classes, Windows;

type
  TXXX = class
    p1: Longint;
    s: String;
    Procedure NEW;
  end;

var
  ClassXXX: TXXX

implementation

Procedure TXXX.NEW;
Begin

End;

End.

Romikgy

Дата 22.2.2006, 17:52 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 26
Всего: 146

Цитата(slavonX86 @ 22.2.2006, 16:47

)

выдаёт ошибку

Какую?

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Bose

Дата 22.2.2006, 17:57 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1458
Регистрация: 5.3.2005
Где: Riga, Latvia

Репутация: 23
Всего: 51

Цитата(slavonX86 @ 22.2.2006, 17:47

)

Когда я пишу СlassXXX.p1 := 100; выдаёт ошибку ! Почему ?

потому что класс вначале создать надо smile

Код


ClassXXX:= TXXX.Create;

--------------------

Лучшее о Delphi за 2013 год. Подборка ссылок.

slavonX86

Дата 22.2.2006, 18:08 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 179
Регистрация: 15.12.2005

Репутация: 0
Всего: 0

а Procedure NEW; работает

Bose

Дата 22.2.2006, 18:31 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1458
Регистрация: 5.3.2005
Где: Riga, Latvia

Репутация: 23
Всего: 51

Цитата(slavonX86 @ 22.2.2006, 18:08

)

а Procedure NEW; работает

а что делает процедура New?

--------------------

Лучшее о Delphi за 2013 год. Подборка ссылок.

Snowy

Дата 22.2.2006, 18:32 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Потому что это процедура класса.
А процедуры могут работать без создания объекта класса.
А конструкторы вообще должны работать только так.
А вот к данным без создания элементов не обратиться - нужно сначала память выделить.
Под методы память выделять не нужно - они уже в коде сидят.
Поэтому и работают. (Если конечно в них к полям не обращаться).

slavonX86

Дата 22.2.2006, 21:52 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 179
Регистрация: 15.12.2005

Репутация: 0
Всего: 0

ClassXXX:= TXXX.Create;
А при выходе из программы он автоматически разрушается не оставляя в памяти следов ?

А можно как-то зделать чтобы класс автоматически создавался при запуске программы ?

Это сообщение отредактировал(а) slavonX86 - 22.2.2006, 21:55

Foley

Дата 22.2.2006, 22:40 (ссылка)

(нет голосов)

Загрузка ...

Фсемба Яцца

Профиль
Группа: Участник
Сообщений: 235
Регистрация: 31.1.2006
Где: Россия, Арх.обл

Репутация: 2
Всего: 7

Цитата(slavonX86 @ 22.2.2006, 21:52

)

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

на FormCreate пропиши создание класса....

Цитата(slavonX86 @ 22.2.2006, 21:52

)

А при выходе из программы он автоматически разрушается не оставляя в памяти следов

если не доверяешь то Free высвобождает память... можешь на FormDestroy написать...
Добавлено @ 22:41
тока для начала переменную класса сделай глобальной...

Yanis

Дата 23.2.2006, 11:55 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Цитата(slavonX86 @ 22.2.2006, 21:52

)

А можно как-то зделать чтобы класс автоматически создавался при запуске программы ?

Можно если в самом файле проекта создавать этот класс, а потом его убивать. Например:

Код


program Project1;

uses { ... }

{$R *.res}

begin
  { создаём класс ... }
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
  { ... убиваем класс }
end.

Или же можно таким образом:

Код


unit Unit1;

interface

uses  { List of units goes here }

  { Interface section goes here }

implementation

uses  { List of units goes here }

  { Implementation section goes here }

initialization
  { Initialization section goes here }

finalization
  { Finalization section goes here }

end.

В initialization создаёшь класс, в finalization убиваешь его. т.е. в модуле (главной) формы дописать эти секции, а в них уже и делать, то что душе угодно.

--------------------

*щёлк*

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »