Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.05;
Скачать: [xml.tar.bz2];

Вниз

как реализовать Обращению к объекту?   Найти похожие ветки 

 
Junior   (2004-11-22 13:48) [0]

Сдравствуйте!
Подскажите как быть!
1) создаю объект типа точка с координатами х,у

type
 TPoint = class
 private
 public
   X,Y : real;
end;

var
 P1, P2, PP1, PP2, PP3, PP4 : TPoint;

2) В приложении необходимо обращаться к одной из точек, заранее не известно к какой. При использовании компонент используется FindComponent, что делать в этом случае? Как я понял тут нужно другая функция. Если можно, с примером. Спасибо!


 
Александр Иванов ©   (2004-11-22 13:57) [1]

Массив точек сооруди.
var P : array[1..n] of TPoint.
Там и ищи.
Можно использовать TList, если неизвестно количество точек.


 
Skier ©   (2004-11-22 13:59) [2]

>Junior   (22.11.04 13:48)  
На мой вкус не за чем из-за двух полей создавать объект. Вполне хватит и записи...


 
begin...end ©   (2004-11-22 13:59) [3]


> [1] Александр Иванов ©   (22.11.04 13:57)


> Можно использовать TList, если неизвестно количество точек.

...или TObjectList.

Хотя пока не ясно, зачем этот TPoint делать классом.


 
begin...end ©   (2004-11-22 14:06) [4]


> [2] Skier ©   (22.11.04 13:59)


> На мой вкус не за чем из-за двух полей создавать объект.
> Вполне хватит и записи...

На мой - тоже. Помнится, тут как-то была дискуссия про динамически создаваемые record"ы и их хранение в TList. Там один товарищ высказался в таком духе: чем мучиться с New/Dispose, давайте лучше из record"а сделаем класс, а его экземпляры будем засовывать в TObjectList; аргументируя это тем, что в TObjectList можно не заботиться об освобождении объекта при удалении из списка. :-)


 
Junior   (2004-11-22 14:23) [5]

> На мой вкус не за чем из-за двух полей создавать объект.

Вопрос принципиальный, количество полей может вырасти, хотелось узнать как вообще делается в таких случаях.

Всем спасибо за внимание! :-)


 
Skier ©   (2004-11-22 14:25) [6]

>Junior   (22.11.04 14:23) [5]

> Вопрос принципиальный, количество полей может вырасти,

На сколько ?


 
Junior   (2004-11-22 14:27) [7]

> Хотя пока не ясно, зачем этот TPoint делать классом.

Вопрос в догонку,когда целесообразно использовать классы

Спасибо!


 
begin...end ©   (2004-11-22 14:29) [8]


> [7] Junior   (22.11.04 14:27)


> Вопрос в догонку,когда целесообразно использовать классы

Как минимум - когда в классе будут ещё и методы, работающие с данными, находящимися в полях.


 
Мастер ©   (2004-11-22 14:30) [9]

Junior   (22.11.04 14:27) [7]

Если приведешь пример, как ты их используешь, то и ответы будут.


 
Junior   (2004-11-22 14:31) [10]

2 Skier
> На сколько ?
в данном примере до 5, а вообще я на стадии обучения :-)


 
Skier ©   (2004-11-22 14:35) [11]

>Junior   (22.11.04 14:31) [10]
Обрати внимание на [8]



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

Форум: "Основная";
Текущий архив: 2004.12.05;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.031 c
1-1100783805
opoloXAI
2004-11-18 16:16
2004.12.05
печать TStrings в TQuickRep.


1-1100825461
fashionguide
2004-11-19 03:51
2004.12.05
Свой текст в Gauge1


1-1101198790
Jann
2004-11-23 11:33
2004.12.05
Нужна прога


14-1100269923
AlexG
2004-11-12 17:32
2004.12.05
Что означает возможность форвардинга?


4-1098457264
parent
2004-10-22 19:01
2004.12.05
Найти процедуру по адресу без отладчика





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский