Страница 1 из 1
Объект
Добавлено: 14 апр 2008, 15:17
scudo
Задача
Построить описание класса, содержащего информацию о почтовом адресе организации. Предусмотреть возможность раздельного изменения составных частей адреса, создания и уничтожения объектов этого класса. В объекте использовать динамические поля.
Написать программу, демонстрирующую работу с этим классом.
Просьба памочь решить данную задачу.Программа Паскаль
Re: Объект
Добавлено: 14 апр 2008, 16:11
Duncon
Скорее удалите тему..
Re: Объект
Добавлено: 14 апр 2008, 16:21
scudo
Я интересуюсь. А почему?
Re: Объект
Добавлено: 14 апр 2008, 17:41
MOTOCoder
scudo писал(а):Я интересуюсь. А почему?
Встречный вопрос - а что именно непонятно?
Как описать объект? Так это в любом самом дохлом самоучителе есть.
Re: Объект
Добавлено: 14 апр 2008, 18:20
scudo
Посмотрю.Я не знаю с чего начать вообще
Re: Объект
Добавлено: 14 апр 2008, 18:21
scudo
если есть ссылка на хороший самоучитель.Киньте
Re: Объект
Добавлено: 14 апр 2008, 20:34
Duncon
В решите задачку такие темы.
пс А что руки сломаются в любом поисковике набрать запрос
Re: Объект
Добавлено: 14 апр 2008, 23:19
MOTOCoder
scudo писал(а):Посмотрю.Я не знаю с чего начать вообще
Начать нужно с изучения ООП.
Класс-это по сути(конечно очень условно) та же запись, только с методами. Специально не буду приводить код по вашему примеру, но выглядеть это может примерно так:
[syntax='Delphi']
Type
TMyClass=object
Field1:integer;
Field2:string;
constructor Create;
destructor Destroy;
function GetField1:integer;
procedure SetField1(d:integer);
end;
constructor TMyClass.Create;
begin
Field1:=0;
Field2:='';
end;
destructor TMyClass.Destroy;
begin
writeln('Object sucessfully destroyed');
end;
function TMyClass.GetField1:integer;
begin
GetField1:=Field1;
end;
procedure TMyClass.SetField1(d:integer);
begin
Field1:=d;
end;
var
MC:^TMyClass;
begin
New(MC,Create);
MC^.SetField1(10);
writeln(MC^.GetField1);
Dispose(MC,Destroy);
readln;
end.
[/syntax]
Re: Объект
Добавлено: 15 апр 2008, 10:16
Игорь Акопян
scudo
персонально вам.
1. Если прочитать самую первую тему в разделе - там сказано, что тема с таким названием будет удалена сразу - учитесь задавать вопросы правильно.
2. Раздел выбран не правильно, ибо это банальный поиск халявы и нежелание делать что-то самому - поэтому как минимум неверный раздел.
Собсно переношу только из уважения к ответившим, иначе удалил бы