ООП на Паскале

@unbelievable · Регистрация: 01.01.2011

Author24 — интернет-сервис помощи студентам

Нужен любой пример использования объектов в Турбо Паскале

@dampir_sanek · 19.05.2011, 17:53

unbelievable,

Pascal

program ObjectPascalExample;
 
   type
      PHelloWorld = ^THelloWorld;
      THelloWorld = object
         procedure Put;
      end;
 
   var
      HelloWorld: PHelloWorld; { this is a pointer to a THelloWorld }
 
   procedure THelloWorld.Put;
   begin
      WriteLn('Hello, World!');
   end;
 
begin
   New(HelloWorld);
   HelloWorld^.Put;
   Dispose(HelloWorld);
end.

Отсюда

@unbelievable 1 / 1 / 1 Регистрация: 01.01.2011 Сообщений: 79
		1
	ООП на Паскале 19.05.2011, 17:29. Показов 1205. Ответов 1 Метки нет (Все метки) Нужен любой пример использования объектов в Турбо Паскале 0

	19.05.2011, 17:53

ООП на Паскале

Решение