Jump to content

Serge_G

Members
  • Content Count

    321
  • Joined

  • Last visited

  • Days Won

    1

Serge_G last won the day on November 13 2021

Serge_G had the most liked content!

Community Reputation

90 Excellent

2 Followers

About Serge_G

  • Birthday 06/29/1956

Technical Information

  • Delphi-Version
    Delphi 12 Athens

Recent Profile Visitors

5592 profile views
  1. Serge_G

    Listview or similar with multi select and columns

    For point 3, grid : Look in my github https://github.com/Serge-Girard/StringGrid2Clipboard this discussion https://www.developpez.net/forums/d2134806/environnements-developpement/delphi/composants-fmx/desktop-tstringgrid-fmx-selections/ For ListView I wrote many bills in my French Blog look for tag Listview https://www.developpez.net/forums/blogs/138527-sergiomaster/b8177/fmx-selection-delements-tlistview/ Bonus : https://www.developpez.net/forums/blogs/138527-sergiomaster/b8201/fmx-selection-delements-tlistview-bonus/
  2. Serge_G

    Retrieve value of INSERT ... RETURNING ...?

    Which connector is used ? Firedac or ? If Firedac you can use a direct query on FDConnexion and try a EXECSQLSCALAR DatabaseId :=FDConnection1.execSQLScalar(SQL,[ADatabase.Name,Adatabase.Filename,ADatabase.FilePath, ADatabase.Description,Now]); Checked, using @emileverh remark about autoincrement
  3. Serge_G

    FMX TListView Item color change runtime

    I wrote some tips about TListview you can find here (in French) , or in this tutorial
  4. Serge_G

    ClientDataSet Wrong Aggregate

    How are your DataSet fields and Aggregate Field declared ? I think it's a rounding problem.
  5. Serge_G

    End Of File

    Hi, What about using onBeforeInsert event and put in it procedure TForm1.MyTableBeforeInsert(DataSet: TDataSet); begin Dataset.Cancel; end; I am not fan of these two values
  6. Serge_G

    Right To Left Components

    Don't remember that now you have Skia and his TSkiaLabel
  7. Serge_G

    Delphi 12CE and SQLite

    To answer @gkobler On page 21 of RAD Studio 12 Feature Matrix There are no limitations noted for a "classic" usage of SQLite . But, I can't test Community version to answer @FrancM
  8. Hello, There is a -service option you have to use Remote Backup & Restore
  9. Serge_G

    TControlList — need help!

    So, I have a look and test with 11.3 and 12.1 (entreprise) and no slow comportment found. So, for me, you got it.🙌 You said you use which version, community ok but last one (which is now a 11.2 or 11.3 version don't remember exactly ) ? As I see in your code, the key is the TControlList.FHeights I never found (for my discharge, I just deep dive in this component at the first occurrence and never run back in it)
  10. Serge_G

    TControlList — need help!

    Thanks for the guru, but actually I am on holidays (let say I prefer this term that a low activity scheme due to retirement 😉) Sure, I will have a look to your project. TControlList variable row heights was in my lengthy to-do list when retired but, as I really prefer FMX TListview this to-do item was in the bottom 10.
  11. Did you install FMXLinux via getit ?
  12. Serge_G

    Simple LiveBindings usage questions

    It's been a long time since I've looked into livebindings, outside database links and even, less in VCL being much more FMX 🙄 So, this question caught my attention. My first idea "its a VCL fact", but, writing the same sample in FMX, I got the same point 3 behaviour. My second clue was to notify BindingList a change, in memory my firsts steps with livebindings procedure TForm1.Button1Click(Sender: TObject); begin Checkbox1.Checked:=not Checkbox1.Checked; BindingsList1.Notify(Checkbox1,'checked'); end; But, unsuccessfully. My guess, checkbox state is changed after the drawing ? For that sort of, unusual, thing I used a one record ProtypeBindSource component with a boolean field And this code procedure TForm1.Button1Click(Sender: TObject); begin PrototypeBindSource1.DataGenerator.Fields.Items[0].SetTValue(not checkbox1.Checked); end; Project22.zip
  13. Serge_G

    Docking Example

    When I first learn about docking, I view these two Alister Christie's videos https://learndelphi.tv/60-movie-32-dockable-forms https://learndelphi.tv/61-movie-33-dockable-forms-2
  14. MyDac can use macro https://docs.devart.com/mydac/work_macros.htm Something like this code (sorry, I don't use Mydac but Firedac) Query1.SQL.Text := 'SELECT * FROM user Where ID IN (&list)'; Query1.MacroByName('list').asString := '1,2,3'; Query1.Open; Otherwise, you can use a format string sqlstring:='SELECT * FROM users WHERE id IN (%s)'; inlist := '1,2,3' query.sql.text:=Format(sqlstring,[inlist]); Ok, it's really a very poor code !
  15. Hi, This is a question I can't respond easily, I have to write one Android application to check that. I will be back 😄 Meanwhile, check/ask on ZeosLib Portal
×