Jump to content

dkprojektai

Members
 View Profile  See their activity

  • Content Count

    61

  • Joined

  • Last visited

Posts posted by dkprojektai

  4. Posted

    Hello all, need some help. Have SAOP service which use security policy and I don't know how to go thru.

     

    The message from server is "These policy alternatives can not be satisfied: ",{http://docs.oasis-open.org/ws-sx/ws-securitypolicy/200702}SupportingTokens,{http://docs.oasis-open.org/ws-sx/ws-securitypolicy/200702}"

     

    The correct header looks like: 

    <soapenv:Header><wsse:Security soapenv:mustUnderstand="1" xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd"><wsse:UsernameToken wsu:Id="UsernameToken-xxxxxxxxxxxxxxxxxxxx"><wsse:Username>xxxxxxxxxx</wsse:Username><wsse:Password Type="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-1.0#PasswordText">xxxxxxxxxxx</wsse:Password><wsse:Nonce EncodingType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary">xxxxxxxxxxxx</wsse:Nonce><wsu:Created>2022-12-18T09:49:23.854Z</wsu:Created></wsse:UsernameToken></wsse:Security></soapenv:Header>

    Does anybody have an working example ? Or any links to study?

     

    Thanks in advance.

  7. Posted · Edited by dkprojektai

    Hello, my program in thread is communicating with remote server.

     

    In thread....           

                CoInitializeEx(NIL, COINIT_MULTITHREADED);
            try

               some error....


               CoUninitialize;

            except
              on E:Exception do begin

                TThread.Queue(nil,
                procedure
                begin
                   F_Form1.Logging(E.ToString);    //Here I have exception and program throw out....
                end);

                CoUninitialize;
              end;
            end;

     

    My question - is it borland or omni problem and how to solve it? I can quote it via try..ecxept, but I really want to log the problem.

     

  8. Posted

    On 6/18/2022 at 9:54 PM, FredS said:

    I wrapped most Alter statements into a 'SQL.Patching.pas' unit which fires what is needed depending on a version field at startup.

    Found the simplest way was to make all changes and then use Beyond Compare on the db creation script to generate an output which is used to call the methods in the Patching unit.

    Can you share ?

  9. Posted

    Hello,

     

    looking for component or any other solution with which I could update client old database. I have a software which on installation writes database from SQL file. From time to time I'm making updates to my database, which have several new tables, new columns, new key's. The problem is to update client database on next installation.

     

    I don't prefer using any separate tool for this. 

     

    I can use this solution - but go true 50 tables and many columns - not the quick way which I'd like to proceed 🙂

     

    Asking for advice quicker solution. Thank you.

     

  10. Posted

    12 hours ago, emailx45 said:

    my case:

    Kaspersky IS  2021 nothing problem at all.

     

    but... rarelly... when compiling a project (basic VCL) ... with nothing  special, sometime a simple ShowMessage added and the antivirus say that my .exe is a trojan ... all of the nothing...

    then I have allow that it do the scanning, delete file and restart my pc, else... nothing is possible "in this project"

     

    thats crazy man!

     

    Note: artificial intelligence has dulled software lately!

    Sometimes I had it too with 360 total security. One time rebuild helps, another Delphi restart 🙂

  13. Posted

    Hello, found interesting problem. Tried to run Delphi Rio debugger on simple 32bit program (just form and nothing else) - and it do not not start. :)

     

    Problem was on antivirus...

     

    360 total security - Details: 
    Process: C:\Program Files (x86)\Embarcadero\Studio\20.0\bin\bds.exe   Add Process to Trust List
    Action: Remote thread injection
    Path: C:\Users\Donatas\Documents\Embarcadero\Studio\Projects\Win32\Debug\Project1.exe
    Suspicious file: C:\Program Files (x86)\Embarcadero\Studio\20.0\bin\android64debugide260.bpl
    Protection information: AD|10, 10, -1|37C394D4165329DD77ED30CEE012408E|<sha1>f4667e3ce43b74f988044661c9a73c88e63f85fa</sha1>

     

    Is there real problem or just a bug ?

  14. Posted

    Hello, need some help to find out where exception rises (it rises not every time, usually after some time processing). Here is the code:

      

    77473b31 ntdll.dll                             KiUserExceptionDispatcher
757ce699 KERNELBASE.dll                        CreateFileW
0076ab2a ANPRl.exe OtlParallel    3440 TOmniParallelSimpleLoop.Execute_2__ActRec._0_Body
0076a716 ANPR.exe OtlParallel    3380 TOmniParallelSimpleLoop.CreateForTask_ActRec._0_Body
00741717 ANPR.exe OtlTaskControl 2008 TOmniTaskExecutor.Asy_Execute
0074071e ANPR.exe OtlTaskControl 1592 TOmniTask.InternalExecute
007404f6 ANPR.exe OtlTaskControl 1510 TOmniTask.Execute
00732fa2 ANPR.exe OtlThreadPool   889 TOTPWorkerThread.ExecuteWorkItem
00732b29 ANPR.exe OtlThreadPool   846 TOTPWorkerThread.Execute
004d8625 ANPR.exe System.Classes      ThreadProc
0040b9a0 ANPR.exe System              ThreadWrapper
76dffa27 KERNEL32.DLL                          BaseThreadInitThunk

    Can someone to explain?

  17. Posted

    8 minutes ago, Cristian Peța said:

    Have you tried with Microsoft driver?
      

    
frxReport9.PrintOptions.PrnOutFileName := 'name.pdf';
frxReport9.PrintOptions.Copies := 1;
frxReport9.PrintOptions.ShowDialog := False;
frxReport9.PrintOptions.Printer := 'Microsoft Print to PDF';
frxReport9.SelectPrinter;
frxReport9.Print;

     

    I can't use it, because all works on Unigui web server. 

  18. Posted

    11 hours ago, Lars Fosdal said:

    What about the queries that provide the data to the report - are they fast if they are run stand alone?

    /* Affected rows: 0  Found rows: 4 956  Warnings: 0  Duration for 1 query: 1,109 sec. (+ 0,032 sec. network) */

  21. Posted

    Thank you all, what I found - disable all to False (for frxPDFExport9). It helps a little. There is picture (8 KB), but I think, it's not this who gives low speed for building PDF. For me 5000 records was build thru 15 seconds. It's too much for me. I use 6.6.9 version and D10.3.

     

    Any other thoughts ?

  22. Posted

    Hello, 

     

    Does any body face with problem - generating pdf speed...

     

    I use Fast Report: 

        frxReport9.PrepareReport();
    frxPDFExport9.ShowDialog := False;
    frxPDFExport9.FileName := FormatDateTime('hhnnss', Time)+'_Report.pdf';
    frxReport9.Export(frxPDFExport9);

     

    this code works extremely slow with more then 5000 dateset records.

     

    Is there any speedy alternative?

     

  25. Posted

    12 hours ago, Remy Lebeau said:

    Without knowing exactly what that function actually is or where it comes from, and given how few parameters it takes, it MOST LIKELY is expecting the WHOLE bitmap, header and everything, not just the raw pixel data by itself.  If so, you would just have to load your BMP file or TBitmap object into a TMemoryStream first, and then you can pass its Memory and Size properties to that function's parameters, eg:

      

    
MS := TMemoryStream.Create;
try
  MS.LoadFromFile('image.bmp');
  or
  BmpObj.SaveToStream(MS);

  Result := ReadFromMemFile(hEngine, MS.Memory, MS.Size);
finally
  MS.Free;
end;

     

    That is what I wanted and it helped. Thanks Remy Lebeau

×