Jump to content

haentschman

Members
  • Content Count

    210
  • Joined

  • Last visited

  • Days Won

    5

Everything posted by haentschman

  1. haentschman

    FireDAC Connection to ADS failed

    thanks... User: DomainName\xxx ... not working. πŸ˜ͺ Was to be expected. It is the database user, not the domain user...
  2. haentschman

    Form Creation

    Hi... How about source code? Complete project? What is the mainform? DonΒ΄t free the mainform!
  3. haentschman

    Delphi Debugging Help

    Hi...welcome here. ...great! Why? Better using the Delphi Community edition...the modern way. https://www.embarcadero.com/products/delphi/starter/free-download/ https://learndelphi.org/de/everything-you-need-to-know-about-debugging-in-delphi/
  4. haentschman

    Fastreports

    Yes...Version 2023.1 πŸ˜‰
  5. haentschman

    Fastreports

    Hi...😎 At first...Events. πŸ˜‰
  6. Hi... Is it possible to drop embedded images from outlook as a file into a folder...with a dummy name? Imho not... Thanks...
  7. haentschman

    Drag and Drop Component Suite: Outlook embedded images

    Hi...😎 ...I will give it a try. πŸ˜‰ that's what i mean with "dummy name" πŸ˜‰ Thanks...
  8. haentschman

    Drag and Drop Component Suite: Outlook embedded images

    Hi I don't use the studio yet. I was only interested in the principle of whether this is possible at all. I have an Outlook mail with which the images are embedded via copy/pase. These have NO file name. I would like to save only the marked picture, which is no file, by drop into a folder. To do this, the "metadata" of the image would have to be converted to PNG or JPG...and get a filename. The normal way is...save the image over context menu. I want it over Drag without temporary file. Outlook -> MyApplication Thanks...
  9. Hi... I need a "Like" in the filter list. With %Value% it works. But users don't understand that. I want to have: on entering "Bla" result from the dataset 'MyBla', 'BlaBlubb'. At DevExpress there is this entry: https://supportcenter.devexpress.com...-or-like-value created 15 years ago...with further links. All are imho not purposeful. ...Endless loop from link to link. I have felt through all filter settings. Does anyone have any ideas. Thank you. Version: 21.2.9 CrossPost: germanDP https://www.delphipraxis.net/212875-devexpress-filterrow-ohne-wildcard.html#post1521131
  10. haentschman

    Looking for a forum is this it?

    welcome here... Here is the right place for programming with C++ or Delphi. Please make sure that you are always in the right subforum...
  11. haentschman

    wuppdi Welcome Page for Delphi 11 Alexandria?

    WP.gksoftPlugin280.bpl ...works, but the icons now imho 32x32 instead of 16x16. (Tree) I do not remember that they were so big.
  12. ...here we are now! Not personal ...for the current and the next generation.
  13. haentschman

    Need a "Delphi programming guideline"

    ...correctly.
  14. haentschman

    Need a "Delphi programming guideline"

    Hi... Sorry, but it is not the right company. That's where the developers get in their own way. Uniform styles are important to understand all "developers" and their code. The management must set the standard! Try to talk to the others about a simple standard (prefixes for components, meaningful variable names, begin/end styles - separate lines or not, CTRL+D for all...). What is the total number of lines of source code? Do you have a trainee for the implementation of the styleguide in the old code? no matter what you do... ...that is the problem! another one... PDF πŸ˜‰ ...great work! Manual_on_Object_Pascal_Style_Guide.pdf
  15. ...for german users... what means "CV". Abbreviations are not always good...
  16. haentschman

    Code completion failure

    ...and much faster! πŸ₯± (code completion, find window etc.)
  17. The Developer certificate is only valid for a limited time... Mine has already expired. Although I have been working in software development for years. Is it still like this? With the Master too?
  18. Hi... ...really? There are two types of exam: Delphi Certified Developer: via online / browser ... i have (exam time: ~1 hour) Delphi Master Certified Developer: ... Uwe has (exam: i dont know time and where) https://www.embarcadero.com/resources/embarcadero-certification-center ...what you want?
  19. haentschman

    TTreeview to JSON VCL?

    Hi... It is not a good idea to keep data storage in a visual control. The JSON should be generated from the data source (class, csv etc.).
  20. haentschman

    SQL problem

    SQL: Qry := TFDQuery.Create(Self); Qry.Connection := Self.AC; Qry.SQL.Text := 'select * from Documents where OriginalFileName like :PAR'; Qry.ParamByName('PAR').AsString := '%1001\%'; // with "\" Qry.Open; Qry := TFDQuery.Create(Self); Qry.Connection := Self.AC; Qry.SQL.Text := 'select * from Documents where OriginalFileName like :PAR'; Qry.ParamByName('PAR').AsString := '%1001%'; // without "\" Qry.Open; ...it works...i not like guessing.
  21. haentschman

    SQL problem

    It is a basic problem with only text in the sql statement! SQL.Text: select A.ID,A.DistributorID,A.DocumentTypeString,A.DocumentCaption,A.OriginalFileName,A.SendTypeFolder, A.SendTypeUSB, A.SendTypeMail, A.ReceiptDate,A.ServiceDate, A.ReceiptNumber,A.Store,A.ReceiptReceiver,A.ServicePartner, A.AddDate,A.AddName,A.ModifiedName,A.ModifiedDate, D.Name1 as StoreName,D.Name2 as StoreName_1,D.LKZ as StoreCountry,D.PLZ as StorePostCode,D.Ort as StoreLocation, D.Strasse as StoreStreet,D.Telefon as StorePhone,R.Name1 as ReceiverReceiverName from Documents A full outer join ADR D on A.Store = D.ixADR full outer join ADR R on A.ReceiptReceiver = R.ixADR where A.OriginalFileName like :REN order by ID desc ... Qry.ParamByName('REN').AsString := '%[_]' + Pair.Key + '[_]' + Pair.Value + '%'; is from me in my the original code. Works! (FireDAC, MSSQL)
  22. haentschman

    SQL problem

    ...no. FDQuery1.SQL.Text := 'select * from tab where code LIKE :Code'; FDQuery1.ParamByName('code').AsString := '%123%'; FDQuery1.Open; ...the "%" is in the parameter! Other Example: Qry.ParamByName('REN').AsString := '%[_]' + Pair.Key + '[_]' + Pair.Value + '%';
  23. haentschman

    SQL problem

    by the way... FDQuery1.SQL.add('WHERE (MainDirectory LIKE ''%' + Edit1.Text + '%'') OR INSTR(''' + Edit1.Text + ''', MainDirectory) > 0' ); you know what SQL Injection is? https://en.wikipedia.org/wiki/SQL_injection The german site is better... With delphi examples: https://de.wikipedia.org/wiki/SQL-Injection πŸ™„ Always use parameters!
  24. haentschman

    How to 'disconnect' a TFDQuery keeping the datas.

    Hi... That's why the components are called "data sensitive". Without a direct connection to the database you have no data.... (unless there is something new ) You have to come up with a separation of data and database. Variant 1: 1. load data with query 2. transfer the data into objects 3. throw away query 4. change data in object 5. save object with SQL (create query, throw away query) ... with this variant one gets along also without data-sensitive components. You can then display an object in the grid as well as a property in the edit. Variant 2: Copy to another dataset: https://docwiki.embarcadero.com/Libraries/Sydney/en/FireDAC.Comp.DataSet.TFDDataSet.CopyDataSet Imho there are other variants....
Γ—