Jump to content

limelect

Members
  • Content Count

    775
  • Joined

  • Last visited

  • Days Won

    1

Posts posted by limelect


  1. @Lars Fosdal  It seems that most pas files associated with FireDAC are not

    accessible. Furthermore, is there a way to know what is going on with my SQLite?

    while executing? DEBUG?

    I think this is not given by Delphi.

    So I will revert to my test as I wrote before.


  2. @Vandrovnik YES . Actually, no need if you have FastMM4,

     

     if TogFirst.IsFirstInstance then
      begin
     ReportMemoryLeaksOnShutdown := True;
        Application.Initialize;
        Application.MainFormOnTaskbar := True;
        Application.CreateForm(TForm1, Form1);
      Application.CreateForm(TfmDropDown, fmDropDown);
      Application.Run;
      end
      else
        TogFirst.ActivateFirstInstance;
     


  3. @Lars Fosdal you are correct my DB is SQLite.

    When I SQL or add records all gives me memory problems.

    What I think I will do I will write an investigation program with

    my actual database to analyze my use so

    I will decrease the program to a manageable logic of one function.


  4. @David HeffernanBy no means I am willing to redesign the DB concept

    if I knew there is a good solution like MS server for example.

    The only problem I will not give my user to install the MS server.

    Why I wrote my problem because someone might come up with a good

    dB that i do not know


  5. I need your advice returning to my problem -out of memory.

    I have this free program  https://limelect.com/downloads/document-projects/

    that came out of my need. After 40+years of pascal/Delphi, I have a large

    number of projects/programs I do not even remember their content categories and more.

    The record includes text category pictures and more describing the source and program.

     

    Just started and I have 730 records with a 1.56 GB database (FireDac) size.

    So fixing the software does not seem to have an option?

    My DB file will grow to be very large.

     

    1. I suspect I will have thousands of records

    2 What is the theoretical size FireDac can handle?

    3. Is it possible to fix my program with software?

    4. I was thinking of splitting the DB.

    5. Can the DB be manipulated on disk and not on RAM?

    6. I am looking for a solution that will NOT cost money as it is a free program.

    7. Installing other software like MS SQLserver is not an option.

    8. I need a local/or any solution.

     

    9. On a commercial program I have in a company I use MS SQLserver 2008 without any problems.

         Years of work and no problems.

     

    What are my options? Or what is my thinking wrong?

     

    Sorry if my need is too long.


  6. @Clément the only thing I see on FDTable is on

    FetchOption.mode is already fmOnDemand

     

    Let me clarify the point. Memory happens ONCE.

    Then everything is ok.

     

    If there was a real memory problem it should have been all the time

    want it?

    I am filtering the database upon writing a search text

    Each char one enter does a new filter.

    To be exact on   >>>> procedure TForm1.Edit6Change(Sender: TObject);

     

    (my database file 1.55GB)


  7. My application has an out-of-memory error

    On the break the source wants FireDAC.DatS.pas which I do not have

    Any idea how to solve this? if possible

     

    P.S after the out of memory if i keep going it is ok

     

    The part that does it is 

      ProjectsFDTable.Filtered := false;
      ProjectsFDTable.FilterOptions := [foCaseInsensitive];
      case RadioGroup2.ItemIndex of
        0:
          begin //'%a%'
            ProjectsFDTable.Filter := {QuotedStr} 'ProjectrealName  LIKE ' +
            QuotedStr('%' + Edit6.Text + '%');  <<<
          end;
        1:
          begin
          end;
        2:
          begin
            ProjectsFDTable.Filter := {QuotedStr} 'Category  LIKE ' + QuotedStr('%'
              + Edit6.Text + '%');
          end;

      end;
      ProjectsFDTable.Filtered := True;

     

    However, I am not sure it is only here !!! but this is where i could trace the out of memory
     

     

×