Телеграмм чат группы Delphi

Size: a a a

Delphi & Lazarus

2021 January 24

generic удаление из массива, к слову. без цикла:

Finalize(Arr[Index]);
Move(Arr[Index + 1], Arr[Index], Tail * SizeOf(T));
FillChar(Arr[High(Arr)], SizeOf(T), 0);

это очень опасный код.
если у тебя управляемый тип, получишь утечку на месте затертого элемента

источник

13:22пожаловаться #1

Alexey Shumkin in Delphi & Lazarus

Dmitry Belkevich

списки внутри суть те же массивы, впрочем

Зачем лезть внутрь реализации, если ему "пофик на циклы", зато есть удобный и подходящий под условия топика интерфейс управления элементами списка?

источник

13:22пожаловаться #2

Dmitry Belkevich in Delphi & Lazarus

Finalize(Arr[Index]);

источник

13:24пожаловаться #3

Viktor Akselrod in Delphi & Lazarus

Dmitry Belkevich

Finalize(Arr[Index]);

во-во 😜

источник

13:24пожаловаться #4

Dmitry Belkevich in Delphi & Lazarus

так лучше, ок )

источник

13:24пожаловаться #5

Viktor Akselrod in Delphi & Lazarus

Dmitry Belkevich

так лучше, ок )

так не лучше, а так правильно.

источник

13:24пожаловаться #6

Dmitry Belkevich in Delphi & Lazarus

не дописал кусок из кода, сорри )

источник

13:24пожаловаться #7

Dmitry Belkevich in Delphi & Lazarus

Tom Cauf

Еще раз напомню, что у меня не делфи, а лазарус и ничего подобного я в подсказках не вижу от слова совсем

https://wiki.freepascal.org/Generics

источник

13:29пожаловаться #8

Sergey Bodrov in Delphi & Lazarus

Tom Cauf

Но Delete с массивами у меня нет

Читайте долбаную инструкцию https://www.freepascal.org/docs-html/rtl/system/delete.html

источник

13:33пожаловаться #9

Sergey Bodrov in Delphi & Lazarus

For dynamic arrays, Delete removes Count elements from the array A, starting at position Index. Index is 0-based. All elements after the deleted elements are shifted Count positions to the left, and the length of the array is adjusted.

источник

13:35пожаловаться #10

Dmitry Belkevich in Delphi & Lazarus

ого ) ну это лазаревское. делфя так увы не умеет

источник

13:36пожаловаться #11

Viktor Akselrod in Delphi & Lazarus

Dmitry Belkevich

ого ) ну это лазаревское. делфя так увы не умеет

умеет. писал же выше

источник

13:37пожаловаться #12

Dmitry Belkevich in Delphi & Lazarus

[dcc32 Error] Unit1.pas(30): E2008 Incompatible types

источник

13:37пожаловаться #13

Viktor Akselrod in Delphi & Lazarus

Dmitry Belkevich

[dcc32 Error] Unit1.pas(30): E2008 Incompatible types

версия и код

источник

13:37пожаловаться #14

Dmitry Belkevich in Delphi & Lazarus

у меня так. XE6

источник

13:37пожаловаться #15

Viktor Akselrod in Delphi & Lazarus

Dmitry Belkevich

у меня так. XE6

ну дак ты бы еще на д7 пробовал)

источник

13:37пожаловаться #16

Dmitry Belkevich in Delphi & Lazarus

ну хз ) может свежие уже научились )

источник

13:37пожаловаться #17

Viktor Akselrod in Delphi & Lazarus

Dmitry Belkevich

ну хз ) может свежие уже научились )

не может, а точно научились.
с этого и пошел разговор про Delete

источник

13:38пожаловаться #18

Dmitry Belkevich in Delphi & Lazarus

ок, отлично. допилили таки ) можно на новых сырцах прибить дженерик версию

источник

13:39пожаловаться #19

Dmitry Belkevich in Delphi & Lazarus

к слову, а Insert тоже допилили?

источник

13:41пожаловаться #20