Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.14;
Скачать: CL | DM;

Вниз

Инкапсуляция   Найти похожие ветки 

 
nft   (2004-02-28 00:35) [0]

Всем привет ! Народ, помогите кто знает, инкапсуляция у меня в Дельфях 6, ну ни как не получается, вообшем делаю следующее --->

type
THello = class
Hi: real;
By: real;
function HelloWorld: real;
end;

далее описываю действия функции HelloWorld, а потом к примеру
на нажатие кнопки ---

var
a: THello;
begin
a:= a.Create;
a.Hi:= 0.07;
a.by:= a.helloworld;
a.destroy
end;

Вроде всё нормально, но выскакивают различные accses violation и тому подобное в огромных кол-вах, причём бывает что значение получается, функция срабатывает, но при закрытии программы такие ощибки невероятные выскакивают, я уже всё перепробовал, не знаю в чём дело, друзья от слов инкапсуляция начинают шарахаться, вообщем в у чебниках одни справки да и только, если кто знает, скажите как сделать правильно pleazzzzzzzzzze !!!


 
Palladin ©   (2004-02-28 00:39) [1]

Учимся создавать объекты
http://www.delphikingdom.com/helloworld/runtime_comp.htm

и кстати причем тут инкапсуляция?


 
Defunct ©   (2004-02-28 00:45) [2]

> и кстати причем тут инкапсуляция?

Это чтобы больше народу заглянуло. ;)


 
VMcL ©   (2004-02-28 02:05) [3]

>>Palladin © (28.02.04 00:39) [1]

Слово красивое. Я бы еще в заголовок, чтоб привлечь внимание, "полиморфизм" вставил - еще красивше.


 
nft   (2004-02-28 02:10) [4]

При чём тут run-time ??? а инкапсуляция это тогда что в вашем понимании интересно знать ???


 
Palladin ©   (2004-02-28 02:25) [5]

А вот после этого перла в орешник однозначно.


> Defunct © (28.02.04 00:45) [2]

не говори :)


> VMcL © (28.02.04 02:05) [3]

:) ну тогда и третий "кит", наследование...

Инкапсуляция, наследование, полиморфизм
Почему объект не создается?
a:=a.create;


 
nft   (2004-02-28 02:29) [6]

Вы не ответили на вопрос. Или не можете ? а про 3х китов я и так знаю, спасибо. *_*


 
Palladin ©   (2004-02-28 02:29) [7]


> nft (28.02.04 02:10) [4]

Кстати говоря, соблюдай рекомендацию №7. Хоть у тебя и знаки вопроса, а не восклицательные. Суть от этого не меняется.


 
Palladin ©   (2004-02-28 02:31) [8]


> nft (28.02.04 02:29) [6]

Я тебе еще в первом посте ответил. Будь добр почитай. Беглое сравнение кода приведнного в статье и твоего приведет тебя к твоей ошибке.


 
nft   (2004-02-28 02:36) [9]

Да, но run-time мне не нужен, в run-time я более менее уже работал,
здесь я не компонент пытаюсь создать, всего лишь обьект, не знаю может я ошибаюсь, но нельзя ли сказать в чём всё таки ошибка ???

P.S.
И всё таки инкапсуляция здесь есть, да конечно я её на фонарь в заголовок кинул, но она есть :)


 
Palladin ©   (2004-02-28 02:38) [10]


> nft (28.02.04 02:29) [6]

или ты про инкапсуляцию спрашивал...

дело не в понимании инкапсуляции, а в том что твоя проблема никакого отношения к ней не имеет


 
Palladin ©   (2004-02-28 02:39) [11]


> nft (28.02.04 02:36) [9]

Не ну всеже ну почитай очень тебя прошу. Или пролистни хоть до первого примера. Если этот пример тебе ни очем не скажет, прости прощай.


 
Германн ©   (2004-02-28 02:50) [12]

2 nft (28.02.04 00:35)

Ну вот для начала попробуй русским(но не матерным) языком объяснить слеущие строчки твоего вопроса:

>var
>a: THello;
>begin
>a:= a.Create;

А, особенно, последнюю из них! (Токмо забудь сперва об "икапсуляциях" и др. "красиво звучащих" терминах).

Токмо попробуй ответить "красивше", тогда в орешнике добавится действительно перл!


 
nft   (2004-02-28 03:20) [13]

Переменно а присвоил значение созданного объекта THello;
Затем создаю объект a:= a.Create
Потом присваиваю значения переменным объекта THello
a.Hi:= 0.07;
a.by:= a.helloworld;
И наконец перед выходом уничтожаю объект
a.destroy
Но почему то вылазят ошибки, я не знаю точно как правилоно создать и использовать объект, может чегото не хватает ???
ЗЫ При чём тут run-time я всё же не пойму, ну да там тоже создание, но объект таким образом не создасться.


 
Defunct ©   (2004-02-28 03:24) [14]

> Затем создаю объект a:= a.Create

A := THello.Create

ЧИТАЙТЕ ЛИТЕРАТУРУ БОЛЕЕ ВНИМАТЕЛЬНО!
Смотрите на примеры, поставляемы с Delphi.


 
Palladin ©   (2004-02-28 04:27) [15]

дайте гвоздь...



Страницы: 1 вся ветка

Текущий архив: 2004.03.14;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.024 c
1-43661
European
2004-02-24 19:32
2004.03.14
Метки по оси Y в TChart


1-43467
Mishenka
2004-02-27 02:35
2004.03.14
Как знать, что найденный файл является каталогом???


1-43443
Kyrt
2004-03-01 04:18
2004.03.14
Меню


14-43848
OverSet
2004-02-22 02:53
2004.03.14
Linux и Pascal/Delphi


1-43605
frost
2004-03-02 14:24
2004.03.14
Изменение названия колонок у TListView