Jump to content

programmerdelphi2k

Members
  • Content Count

    1406
  • Joined

  • Last visited

  • Days Won

    22

Everything posted by programmerdelphi2k

  1. programmerdelphi2k

    Refresh dbedit after insert

    type TForm1 = class(TForm) DBGrid1: TDBGrid; DBGrid2: TDBGrid; fdMemMASTER: TFDMemTable; fdMemDETAILS: TFDMemTable; fdMemDETAILSID_XX_One: TIntegerField; fdMemDETAILSID_XX_Two: TIntegerField; fdMemDETAILSID_XX_Three: TIntegerField; fdMemDETAILSAny_Field_Null_Or_Not: TStringField; fdMemMASTERID_AA_One: TIntegerField; fdMemMASTERID_AA_Two: TIntegerField; fdMemMASTERAny_Field_Null_Or_Not: TStringField; dsMASTER: TDataSource; dsDETAILS: TDataSource; procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin fdMemMASTER.Close; fdMemMASTER.IndexFieldNames := 'ID_AA_One;ID_AA_Two'; // simulating my PKs fdMemMASTER.IndexesActive := true; // fdMemDETAILS.Close; fdMemDETAILS.MasterSource := dsMASTER; fdMemDETAILS.MasterFields := 'ID_AA_One;ID_AA_Two'; fdMemDETAILS.DetailFields := 'ID_XX_Two;ID_XX_Three'; fdMemDETAILS.IndexFieldNames := 'ID_XX_Two;ID_XX_Three'; fdMemDETAILS.IndexesActive := true; // fdMemMASTER.Open; fdMemDETAILS.Open; end; end. A sample using FDMemTable in FireDAC for test!!!
  2. programmerdelphi2k

    Refresh dbedit after insert

    Bond... James Bond. 🤣
  3. programmerdelphi2k

    Refresh dbedit after insert

    I think your case is a MASTER-DETAIL case! solve it
  4. programmerdelphi2k

    Refresh dbedit after insert

    no no no... use refresh!!! it's almost the same.
  5. programmerdelphi2k

    Refresh dbedit after insert

    DBEDIT as others DBxxxx dont refresh automatically any changes on db, you needs refresh your records... tablexxx.REFRESH... for example or close and open table. a refresh can cause "cancel" changes not commited on tables
  6. programmerdelphi2k

    Refresh dbedit after insert

    I dont know if understand but... the "post" happens when you change to another record, for example... if any field is "NOT NULL", then it needs a valid value! then... empty or null it's not valid here! if you need "insert" a new record in "a table", based on values from other, then you needs have it in "another table"! in SQL Db u can use the "events" INSERTING, UPDATING, DELETING to process any other actions, for example, insert a new record in historic tables...or any other action. in Delphi, you can use DATASOURCE component to create a MASTER-DETAIL way... then, you can have your fields DETAILS automacally fill when in edit mode, for example.
  7. programmerdelphi2k

    Delphi 11.3 is available now!

    https://docwiki.embarcadero.com/RADStudio/Alexandria/en/Installation_Notes
  8. programmerdelphi2k

    Delphi Registration

    you can install as TRIAL (14days or 30) and later register it?
  9. programmerdelphi2k

    Retrieve count values on different columns

    you 50 tables, right? you can try use "UNION" like this: FieldXXXnnBoolean = always same type MyBoo = common name for it in final recordset TableX = each table or same table (if all fields is in) now, just COUNT( ) your final recordset field MyBoo... or in each SELECT (avoiding many rows on final recordset)
  10. programmerdelphi2k

    Could not find Wizard ... FmuxLib.dll

    you can do it directly in your REGISTRY on Embacadero key ... find WIZARDs sub key and add or fix the path on FMXLinux reference. find by "fmuxlib.dll"
  11. programmerdelphi2k

    Android not installing and being setup correctly

    Here some that you can to do if needs update your SDK Android: NOTE: Android Studio and Delphi is not tottally compatible when in installation files!!! NOTE2: you DONT need use default folder to NDK/SDK Android, my preference is always create myself directory (like D:\MySDKs\Android\NDK/SDK for each IDE and just use it in my setup! - I always avoid use "System folders" or long-names) NOTE3: you can have your ANDroid files in any place in your disk or system! Not needs any installation, just copy it! look this https://en.delphipraxis.net/topic/7949-problem-on-update-sdk-ndk-in-delphi-11/
  12. is there any possibility that the "Kind" property is being changed at some point in the code? In text mode, from your form, can you see the bitmap data (in Hex)?
  13. programmerdelphi2k

    Possible formatting bug in D11.3??

    ok
  14. programmerdelphi2k

    Possible formatting bug in D11.3??

    I think that it was always that way for me! var... Ctrl+D .... xxxxx // inline way
  15. programmerdelphi2k

    Possible formatting bug in D11.3??

    the RAD use some templates to Code Editor like CSS format, you can see on ObjRepo on RAD... then, I think that u can customize it, but it's not documented at all. I has tryed to customize help insight but just for tests...
  16. programmerdelphi2k

    Possible formatting bug in D11.3??

    it's by default! did you try some like this: "... comments break-the-rules ..." do you remember? https://en.delphipraxis.net/topic/8466-delphis-formatter-driving-me-mad/?tab=comments#comment-71028
  17. programmerdelphi2k

    Stack Overflow error

    sorry my TYPO: not .Dpr, but it was .DprOJ
  18. programmerdelphi2k

    Delphi 11.3 is available now!

    Streamlining RAD Studio Upgrades with GetIt by Jim McKeeth This guide covers streamlining GetIt packages during and upgrade and installation for a smoother upgrade experience. Table of Contents Prerequisites 1) Backup Package List 2) Uninstall GetIt Packages (minor updates) 3) Perform the RAD Studio Upgrade 4) Check GetIt Package Versions 5) Reinstall GetIt Packages Summary and Notes https://blogs.embarcadero.com/streamlining-rad-studio-upgrades-with-getit/
  19. programmerdelphi2k

    Stack Overflow error

    did you try delete .Dpr and recreate for 11.3? or any setup file created by old IDE? EDIT: FIX: sorry TYPO... I say .DROJ
  20. programmerdelphi2k

    Delphi 11.3 is available now!

    a demo about High DPI "Horror", of couse: just PrintScreen 😁 😂
  21. programmerdelphi2k

    Windows Notification in Exe2 when Exe2 started from Exe1

    I think the "A manifest definition" is already include in exe by default... you can see it using Notepad++ for example, not?
  22. programmerdelphi2k

    Delphi 11.3 is available now!

    as I said: I always uninstall, install my softwares! no fails!!! of course, the "software" is not include in "no fails" 🤣
  23. programmerdelphi2k

    Desktop path crossplatform?

    use a "IF" to "IF" 😁
  24. programmerdelphi2k

    Delphi 11.3 is available now!

    my installation was "clean-install"! I always do it that way... uninstall old, install new! ...my way (by Frank Sinattra) >:)
  25. programmerdelphi2k

    Desktop path crossplatform?

    There is not problem at all, just each one use your way! about {$ELSEIF} is the same... win who arrives at first! {$DEFINE hello1 } {$DEFINE hello2 } {$DEFINE hello3 } procedure TForm1.FormCreate(Sender: TObject); begin {$IF DEFINED(hello1)} ShowMessage('hello1') {$ELSEIF DEFINED(hello2)} ShowMessage('hello2') {$ELSEIF DEFINED(hello3)} ShowMessage('hello3') {$ELSE} ShowMessage('hello ELSE') {$ENDIF} end;
×