Репутация участника min@y™

Aндрей

Отзыв: +1

Спасибо, переделал вот так

    TResultData = class
    public
        //Название команды/участника
        CompetitorName: string;
        //Отсечка(сек)
        CutoffTimeSec: Integer;
        //Общее Время работы(сек)
        TimeSec: Integer;
        //Чистое время(сек)
        WorkingTimeSec: Integer;
        //Сумма штрафов(сек)
        PenaltySec: Integer;
        //Результат(сек)
        ResultSec: Integer;
        //Результат(в баллах)
        ResultNumber: Integer;
        //Место
        Place: Integer;
    end;
 
    TResultDataList = class(TObjectList)
    public
        constructor Create;
        function Add    (AResult: TResultData): Integer;
        function Remove (AResult: TResultData): Integer;
        function IndexOf(AResult: TResultData): Integer; overload;
        function IndexOf(ACompetitorName: string): Integer; overload;
        function First : TResultData;
        function Last  : TResultData;
        function IsTeamExists(TeamName: string): Boolean;
    private
        function  GetItem(Index: Integer): TResultData;
        procedure SetItem(Index: Integer; AResult: TResultData);
        property Items[Index: Integer]: TResultData read GetItem write SetItem; default;
    public
        const RESULT_NOT_EXIST = -4;
    end;

SHEV

Отзыв: +1

Спасибо за помощь!!!!

SHEV

Отзыв: +1

Спасибо за совет

Halls

Отзыв: +1

Молодцом!)

winner13

Отзыв: +1

Спасибо за пример, есть чему мне поучится.

lechub

Отзыв: +1

Скорее всего это то что надо! С нетерпением жду любую версию

Дмитри3241

Отзыв: -1

Еше довно нагрубил :D

Hideman

Отзыв: +1

аз отзыв

ierihon1

Отзыв: +1

отличный ответ)

skew

Отзыв: -1

никакой пользы

Pest

Отзыв: +1

за своевременный и понятный ответ

t116

Отзыв: +1

Очень быстро помог

Aндрей

Отзыв: +1

Спасибо за потраченное на меня время

t116

Отзыв: +1

Очень благодарен этому Человеку за то, что не отвернулся и направил в нужное русло в тот момент когда мне была нужна помощь. С его помощью я попал на этот сайт где нашел действительно много полезной и доступной информации. Спасибо min@y™

winner13

Отзыв: +1

СПС

bugmenot

Отзыв: -1

необоснованный наезд же!

Димон

Отзыв: +1

Данный эксперт поддерживает связь, и помогает в вопросе

Aндрей

Отзыв: +1

Спасибо за потраченное на меня время

Андрей_trico

Отзыв: +1

Спасибо за код, заработало.
а то я совсем был запутался. оч выручил)

eclipse

Отзыв: +1

агась!