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

02:27пожаловаться #1

Д

Дмитрий in Delphi & Lazarus

Кто она и что значит начинается с цифры два?
И самое главное где это всё происходит?

02:28пожаловаться #2

Д

Дмитрий in Delphi & Lazarus

Здравствуйте! Как удалять запись из базы данных в делфи, чтобы в аксес таблице не удалялась строка? (Я написал Код на кнопку удаления: Form1.AdoQuery1.Delete; - оно удалило запись, но при добавлении новой она начинается с цифры 2).

Код что вы описали действительно удаляет запись БД в случае подтверждения транзакции (если это применимо).
А что вам нужно то?

02:30пожаловаться #3

N

не умеешь ты читать мысли однако

02:34пожаловаться #4

N

он хочет, чтобы нумерация записей уменьшалась при удалении записи из таблицы

02:35пожаловаться #5

N

автоинкремент он в школе не проходил прост )

02:39пожаловаться #6

N

поэтому не знает с чем его едят

02:39пожаловаться #7

RB

Ruslan B in Delphi & Lazarus

В аксесе у меня стоит поле с типом счетчик.

02:50пожаловаться #8

RB

Ruslan B in Delphi & Lazarus

Почему оно не обновилось ? Нужен какой-то sql- запрос ?

02:53пожаловаться #9

RB

Ruslan B in Delphi & Lazarus

Вот..

02:59пожаловаться #10

AS

Почему оно не обновилось ? Нужен какой-то sql- запрос ?

А почему оно должно обновиться?

12:03пожаловаться #11

A

Anthony in Delphi & Lazarus

Вот..

Оно ж увеличивается? Если тип счётчик, то так и должно быть по логике

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

O

Oleg in Delphi & Lazarus

Сброс значения счетчика в Access

Здравствуйте! Как удалять запись из базы данных в делфи, чтобы в аксес таблице не удалялась строка? (Я написал Код на кнопку удаления: Form1.AdoQuery1.Delete; - оно удалило запись, но при добавлении новой она начинается с цифры 2).

Читать вот тут и думать, надо ли это вообще в бизнес-логике (точнее, почему бизнес-логика оказалась завязана на такое требование): https://docs.microsoft.com/ru-ru/office/troubleshoot/access/reset-autonumber-value

Docs

В этой статье представлены пошаговые методы сброса значения поля счетчика в Access. Сюда входит сброс поля счетчика в одной таблице или в таблице со ссылками на таблицы.

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

M

Mike in Delphi & Lazarus

если есть строка 1a;2a;3a;4f;rt хочу перегнать ее в tstringlist заменив ";" на #13#10 и потом запрашивать вывод по номеру строки. но чет не получается сделать список

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

KB

Kit Bayun in Delphi & Lazarus

Mike

если есть строка 1a;2a;3a;4f;rt хочу перегнать ее в tstringlist заменив ";" на #13#10 и потом запрашивать вывод по номеру строки. но чет не получается сделать список

ошибка в 17ой строке

Contribute to PyatyginSY/NoLoad development by creating an account on GitHub.

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

СП

Сергей Пятыгин... in Delphi & Lazarus

Добрый день!

Имеется Подкласс TNLL = Class(TNL) в котором используются данные из результатов выполнения метода класса TSM = Class(TObject).

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_noload.pas#L65

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_systemmagnetic.pas#L14

Оба класса создаются и выполняются в методе класса TCalculateThread = Class (TThread)

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_view.pas#L16

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_view.pas#L150

Как правильно сделать, с точки зрения инкапсуляции классов/юнитов?
Вариант 1 (реализовано сейчас)
В interface в uses TNLL = Class(TNL) приведен указатель на u_systemmagnetic TSM = Class(TObject). TNLL = Class(TNL) знает о TSM = Class(TObject), TSM = Class(TObject) не знает о TNLL = Class(TNL).

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_noload.pas#L8

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_noload.pas#L202

Вариант 2.
Клонировать результаты из TSM = Class(TObject) в промежуточный класс данных и его указывать в interface в uses TNLL = Class(TNL). TNLL = Class(TNL) ничего не будет знать о TSM = Class(TObject)

GitHub

PyatyginSY/NoLoad

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

AS

Mike

если есть строка 1a;2a;3a;4f;rt хочу перегнать ее в tstringlist заменив ";" на #13#10 и потом запрашивать вывод по номеру строки. но чет не получается сделать список

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

15:05пожаловаться #17

AS

Contribute to PyatyginSY/NoLoad development by creating an account on GitHub.

Сергей Пятыгин

Добрый день!

Имеется Подкласс TNLL = Class(TNL) в котором используются данные из результатов выполнения метода класса TSM = Class(TObject).

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_noload.pas#L65

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_systemmagnetic.pas#L14

Оба класса создаются и выполняются в методе класса TCalculateThread = Class (TThread)

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_view.pas#L16

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_view.pas#L150

Как правильно сделать, с точки зрения инкапсуляции классов/юнитов?
Вариант 1 (реализовано сейчас)
В interface в uses TNLL = Class(TNL) приведен указатель на u_systemmagnetic TSM = Class(TObject). TNLL = Class(TNL) знает о TSM = Class(TObject), TSM = Class(TObject) не знает о TNLL = Class(TNL).

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_noload.pas#L8

https://github.com/PyatyginSY/NoLoad/blob/f16511cbd9aa7743aacfcc86886489f8a9669c15/u_noload.pas#L202

Вариант 2.
Клонировать результаты из TSM = Class(TObject) в промежуточный класс данных и его указывать в interface в uses TNLL = Class(TNL). TNLL = Class(TNL) ничего не будет знать о TSM = Class(TObject)

GitHub

PyatyginSY/NoLoad

Почитай книжки уже, а? :)

15:06пожаловаться #18

AS

Ну, там, Чистый код, Совершенный код (эта побольше)...

15:09пожаловаться #19

СП

Сергей Пятыгин... in Delphi & Lazarus

Alexey Shumkin

Ну, там, Чистый код, Совершенный код (эта побольше)...

А в них раскрывается разве для конкретного ЯП? Возможно я ошибаюсь, но к примеру в шарпе большая часть классов паблик, для реализации mvvm. В FPC если не указать в uses, то класс не виден.