Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.11.2008, 19:47   #1
Викдон
Форумчанин
 
Аватар для Викдон
 
Регистрация: 11.11.2008
Сообщений: 161
Подмигивание объекты в Turbo Pascal

можете скинуть литературу по объектам в паскале))
Викдон вне форума Ответить с цитированием
Старый 13.11.2008, 17:51   #2
Stalkeruss
Новичок
Джуниор
 
Регистрация: 13.11.2008
Сообщений: 1
По умолчанию

Да в нете уйма просто литературы, поищите.
Stalkeruss вне форума Ответить с цитированием
Старый 14.11.2008, 00:18   #3
Alter
Старожил
 
Аватар для Alter
 
Регистрация: 06.08.2007
Сообщений: 2,239
По умолчанию

Например(просто показать устройство кода, ничего оно невыполняет значимого), писал в браузере:
Код:
TYPE TKadr=Object
   x,y :integer;
   d1,d2 :real;
Procedure SetXY(var Ex,Ey :integer);
          End; 

Procedure TKvadro.SetXY(var Ex,Ey :integer);
begin // установка значений "X" и "Y"
 x:=Ex;
 y:=Ey;
end;

VAR x_, y_ :integer; Kv :TKvadro;
begin
 Write(' Введите координату (x1)стороны: '); Readln(x_);
 Write(' Введите координату (y1)стороны: '); Readln(y_); 
 Kv.SetXY(x_, y_);
 WriteLn('X=', Kv.X);
 WriteLn('Y=', Kv.Y);
 Readln;
end.
Alter вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите с Turbo Pascal ohotnik Помощь студентам 4 13.04.2009 22:14
переменные Turbo Pascal Adzumi Помощь студентам 7 29.03.2008 20:11
Задача на Turbo Pascal W_P Помощь студентам 1 14.02.2008 18:24