🚀 go-pugleaf

W dniu wtorek, 4 grudnia 2018 13:00:08 UTC+1 użytkownik danielma...@gmail.com napisał:
> W dniu piątek, 2 listopada 2018 08:33:17 UTC+1 użytkownik kamel...@gmail.com napisał:
> > W dniu czwartek, 25 października 2018 15:13:46 UTC+2 użytkownik kamel...@gmail.com napisał:
> > > W dniu czwartek, 25 października 2018 10:55:53 UTC+2 użytkownik immo napisał:
> > > > W dniu poniedziałek, 22 października 2018 09:28:21 UTC+2 użytkownik Roman Tyczka napisał:
> > > > > On Mon, 22 Oct 2018 00:04:34 -0700 (PDT), immo wrote:
> > > > > 
> > > > > >> Ps.
> > > > > >> Dalej uważam, że idę w dobrym kierunku mając to wszystko w jednym projekcie :-)
> > > > > > 
> > > > > > 
> > > > > > Mam nadzieję że to ironia, a jeśli nie, to jak patrzeć na pierwszego Twojego posta rozpoczynającego ten wątek?
> > > > > > Ten "dobry" kierunek implikuje problem w nim opisany.
> > > > > 
> > > > > Nie do końca, ten jego projekt nie jest jakiś ekstremalnie wielki, zarówno
> > > > > IDE jak i kompilator też mają swoje za uszami i jakością nie grzeszą.
> > > > > Najlepszym dowodem na to jest IDEFix Pack od Andreasa, który w najnowszym
> > > > > Delphi ma być częściowo zintegrowany ze środowiskiem przez samą Embę.
> > > > 
> > > > Nie o to chodzi... Mam projekty większe i nie mam problemu z szybkością kompilacji. Więc uważam że problem może być w samym specyficznym projekcie.
> > > > Co do kompilatora i IDE, po pierwsze EMB prościej jest zaimplementować IDEFix'a płacąc Andreasowi, niż robiąc coś takiego samemu. To hameryka i mogłoby się zdarzyć że byłby pozew o używanie nie swojego kodu :>
> > > > 
> > > > A poważnie - jak przesiądziesz się na Jave lub/i C#.NET to dopiero docenisz to co masz w Delphi. Build dla projektu takiej wielkości grubo powyżej godziny? Nie ma problemu...
> > > > 
> > > > pozdrawiam,
> > > > Przemek O.
> > > 
> > > Na dziś to jest (Build) 23 min. Nie mam za bardzo czasu się z tym grzebać i tak w "wolnej chwili" się tym zajmuje. Poza tym, nie za bardzo widzę by ktoś inny oprócz mnie to zwalczył, bo znam ten projekt od początku, a jak wiemy "diabeł tkwi w szczegółach" :-).
> > > ---
> > > Pozdrawiam
> > > Roman
> > 
> > Dziś skończyłem refaktoring tego kodu ERP pod Delphi 10.2. Obecnie cały build (2.11 mln linii kodu) wykonuje się w 1 min i 10 s. Wszystko co możliwe z interface do implementation ... :-) 
> > Tylko pytanie, czy to tak być powinno, że każda migracja kodu to "koryta krwi i morze potu" ? Rozumiem, że to 8 lat w życiu kompilatora, ale ...
> > Mam jeszcze parę zagwozdek w stylu FreeAndil(...) bez problemów działających w D2010, natomiast w 10.2 jest "Access violation ...", ktoś to przerabiał ?  
> > 
> > ---
> > Pozdrawiam
> > Roman
> 
> Pewnie zaczeli już coś motać z referencjami do obiektów, np. w kompilatorze na Androida trzeba uzywac DisposeOf w pozbywaniu się obiektów

Mamy coś takiego :

procedure DsEventsClear(var DsEventsTemp: TClientDataSet;
  var localTable: TClientDataSet);
begin
  if (DsEventsTemp = nil) or (localTable = nil) then
    exit;
  try
    DsEventsTemp.OnNewRecord := localTable.OnNewRecord;
    DsEventsTemp.BeforePost := localTable.BeforePost;
    DsEventsTemp.BeforeEdit := localTable.BeforeEdit;
    DsEventsTemp.IndexDefs := localTable.IndexDefs;
    DsEventsTemp.AfterScroll := localTable.AfterScroll;
    localTable.OnNewRecord := nil;
    localTable.BeforePost := nil;
    localTable.BeforeEdit := nil;
    localTable.AfterScroll := nil;
    localTable.IndexDefs.Clear;
  except
  end;
end;

procedure DsEventsApply(var DsEventsTemp: TClientDataSet;
  var localTable: TClientDataSet);
begin
  if (DsEventsTemp = nil) or (localTable = nil) then
    exit;
  try
    localTable.OnNewRecord := DsEventsTemp.OnNewRecord;
    localTable.BeforePost := DsEventsTemp.BeforePost;
    localTable.BeforeEdit := DsEventsTemp.BeforeEdit;
    localTable.IndexDefs := DsEventsTemp.IndexDefs;
    localTable.OnCalcFields := DsEventsTemp.OnCalcFields;
    localTable.AfterScroll := DsEventsTemp.AfterScroll;
  except
  end;
end;

W Delphi 2010 działa bez najmniejszych problemów, w D10.2 jest  
"Access violation ..." 

Jakieś pomysły, jak to napisać w D10.2 ?
---
Pozdrawiam
Roman