Jump to content

programmerdelphi2k

Members
  • Content Count

    1406
  • Joined

  • Last visited

  • Days Won

    22

Everything posted by programmerdelphi2k

  1. programmerdelphi2k

    Delphi 11.3 is available now!

    first time that ISO dont show any "download error while installing...since RAD 10.x ",... wow! ...before, always old history: trying install, install, install... Installed!
  2. programmerdelphi2k

    Override the constructor of Main form

    I think that is the same than VCL... Form1 is a Main-Form in project, as expected! program Project1; uses System.StartUpCopy, FMX.Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.
  3. programmerdelphi2k

    Delphi's Formatter driving me mad...

    the RAD use this Key in REGISTRY: -- HLM -> installer default setup --> this will be copyed to HCU Embarcadero keys.... -- HCU -> for each user in MSWindows try backup Embarcadero in HLM and HCU route: -- try delete the "formatter" keys in two places!!!
  4. programmerdelphi2k

    Delphi's Formatter driving me mad...

    not for that!
  5. programmerdelphi2k

    Delphi's Formatter driving me mad...

    try the following: close RAD! in your Registry, find the "Formatter" keys (for Delphi in special) // \HKEY_CURRENT_USER\SOFTWARE\Embarcadero\BDS\22.0\Editor export it for file (backup) delete it run RAD and see! (a new formatter will be created... if not ok, you can restore your backup file REG...
  6. programmerdelphi2k

    Delphi's Formatter driving me mad...

    very weird... I dont use any plugin.. just pure IDE!
  7. not for me! it's only for curiosity! thanks
  8. programmerdelphi2k

    Delphi's Formatter driving me mad...

    some plugin like CnPack, GExpert in use? try uninstall it or stop!
  9. programmerdelphi2k

    Delphi's Formatter driving me mad...

    for me, Delphi's Formatter (with my special setup to right-marging in 200cols ) works good... look MyFormatter_Definitions.config
  10. hi @David Heffernan ok, if dont... then it cannot! question: ...and into def files it's not possible define any directive (like in Delphi) to compile 32 or 64bit code? (please dont be cruel with me 😅 ☺️
  11. if you have all compiled files (DCU, BPL, DCP, etc...) for example, you needs just replace old files (with same IDE edition) of course, else, you 'll need compile new version!!! normally, the installer just try delete old-files, copy new binary to folders! sometimes do some recompiling...
  12. programmerdelphi2k

    TDFBatchMove.GuessFormat - How Many Rows Does It Read?

    in "TFDBatchMoveTextReader" you can define the Fields/Format expected!!!
  13. before any updates, you can verify if residual-old-files exists or not, for Indy try "dir id*.* for example on CMD RAD store its DCU, BPL, DCP in \bin and for platforms see on \lib dont forget verify the "Library path", "Browse Path", "DCU path" on setup
  14. if you Ribbon style use any "file" (like styles in VCL / FMX ) you would can try "edit it" using a tool for that, like IDE do using "Bitmap Style Designer".... (if this is possible in XE6). now if the style use internal definitions (code) then, you know... needs hack it or copy the unit and change it
  15. programmerdelphi2k

    ODBC script for SQLite

    You can try create a new "key" (for your Alias) on "HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources" in your registry. then, your app can create a new key with all data necessary for your alias, like: tip: use the same data like in desigtime NOTE: your customer should have ODBC install of course, to complete the task... Another tip: create a manual DSN definition in your PC, and go Registry and "Export it" to text and see how do it!!!
  16. programmerdelphi2k

    TDFBatchMove.GuessFormat - How Many Rows Does It Read?

    AnalizeSample is used in "FireDAC.Comp.BatchMove.Text.pas, line 1360 (RAD 11.2) " for that, for sure
  17. programmerdelphi2k

    Editmask with variable

    You can use "\" to define non-replaceable characters in your mask. Thus, these characters will appear and will not be replaceable Some like this, or another to "add "\" before each digit of year-value uses DateUtils; procedure TForm1.Button1Click(Sender: TObject); var LYear: string; begin for var D in YearOf(now).ToString do LYear := LYear + '\' + D; // MaskEdit1.Clear; MaskEdit1.EditMask := Format('!99/99/%s;1;_', [LYear]); //'!99/99/' + LYear + ';1;_'; Caption := MaskEdit1.EditMask; end;
  18. no, no, no! YOUR CODE can, then, just "use the directives" to separate "Win32/Win64" coding... you use "Project Options" too to choice how all works... including use "Build Events" to determiante what actions your project needs before/after/on pre-linking...
  19. programmerdelphi2k

    FreeAndNil 10.4 vs 10.3.1 and Pointers

    OMG, sorry... wrong thread! sorry!
  20. you can try use "Compiler Directives": you can create yourself directive too:
  21. programmerdelphi2k

    client pc database connection problem with interbase server

    are you sure that "Firewall/Antivirus" dont block it (any IP/Port)?
  22. programmerdelphi2k

    TDFBatchMove.GuessFormat - How Many Rows Does It Read?

    my "TFDBatchMoveTextReader" = option = WithFieldNames = true, but you can config it for another approach (... all FDBatchMoveXXXX too!) The procedure will read the first line of text, to check which is the delimiter used, then each "text" collected will be used to check its "type", if it is not of type "string", then it is not the list of fields, but the data. then a new check to see some data from the lines that represent the records... This will create a new list to compare the types of each column in the record. in tests, only 8 records are read before completing the final analysis. each line is readed and analized using a stream, like TStream way. Then, basically there is not limit, just 1 line each iteration! (until 8191 chars or EOL/#13/#10 chars) Tested using table "Employee" demo!
  23. programmerdelphi2k

    Custom component - delete connected component - Abstract error

    none code for help us? abstract error, stay to "needs implement a proc/func" inherited from "ancestral", but in your class "does not exists yet"! it needs be implement in your custom component class
×