Интересно, а если тут вообще убрать упоминание массива, дженерик будет

Question

Интересно, а если тут вообще убрать упоминание массива, дженерик будет

работать правильно?

generic TArrayHelper<T> = class
class procedure DeleteElement(var Arr: T; Index: Integer);
end;
class procedure TArrayHelper.DeleteElement(var Arr: T; Index: Integer);
var
Last: Integer;
begin
Last := High(Arr);
if (Index < 0) or (Index > Last) then Exit; // Error handling for invalid index

if Index < Last then
Move(Arr[Index + 1], Arr[Index], (Last - Index) * SizeOf(T));

SetLength(Arr, Last);
end;

#lazarus #programming #russian

0

07.01.2024

15 ответов

50 просмотров

Кокошник наголо Автор вопроса

zamtmn
в fpc должен, если специализуешь динмассивом. в де...

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

0

12 месяцев назад

zamtmn

Кокошник наголо
спсб, а то уж больно симпатичный код получается, е...

ты объяви нужный тип внутри и юзай его type generic TArrayHelper<T> = class type TMyArray=array of T; class procedure DeleteElement(var Arr: TMyArray; Index: Integer); end;

0

12 месяцев назад

Nik

zamtmn
в fpc должен, если специализуешь динмассивом. в де...

синтаксис специфичен для fpc.. делфи-то тут причём?

0

12 месяцев назад

Кокошник наголо Автор вопроса

zamtmn
ты объяви нужный тип внутри и юзай его type gene...

фокус не получится, нужно будет делать приведение типов

0

12 месяцев назад

zamtmn

Nik
синтаксис специфичен для fpc.. делфи-то тут причём...

это пожалуй единственное принципиальное различие - то что можно в фпц нельзя в делфи

0

12 месяцев назад

zamtmn

Кокошник наголо
фокус не получится, нужно будет делать приведение ...

пробовал? или предпологаешь?

0

12 месяцев назад

Nik

zamtmn
это пожалуй единственное принципиальное различие -...

ты ж на делфи не писал никогда.. зачем в обсуждение кода на fpc притягивать делфи?

0

12 месяцев назад

zamtmn

Nik
ты ж на делфи не писал никогда.. зачем в обсуждени...

расслабся

0

12 месяцев назад

Viktor Akselrod 💻

1) тут будет мемлик в случае, если элементы массива автотипы типа строки или интерфейса 2) для удаления элемента массива есть готовая функция delete

0

12 месяцев назад

Кокошник наголо Автор вопроса

zamtmn
пробовал? или предпологаешь?

Стикер

0

12 месяцев назад

Кокошник наголо Автор вопроса

Viktor Akselrod 💻
1) тут будет мемлик в случае, если элементы массив...

для удаления элемента массива класса существует стандартная функция удаления? Можно узнать где она зарыта в дженерике?

0

12 месяцев назад

Viktor Akselrod 💻

Кокошник наголо
для удаления элемента массива класса существует ст...

https://docwiki.embarcadero.com/Libraries/Alexandria/en/System.Delete

0

12 месяцев назад

zamtmn

program Project1; {$mode delphi} type TArrayHelper<T> = class type TMyArray=array of T; class procedure DeleteElement(var Arr: TMyArray; Index: Integer); end; type ArrayHelper=TArrayHelper<char>; myArray=array of char; var ma:myArray; class procedure TArrayHelper<T>.DeleteElement(var Arr: TMyArray; Index: Integer); begin end; begin ArrayHelper.DeleteElement(ma,1); end.

0

12 месяцев назад

zamtmn

zamtmn
program Project1; {$mode delphi} type TArrayHelp...

а вообще - юзай gvector из fcl-stl

0

12 месяцев назад