Jump to content

alank2

Members
  • Content Count

    128
  • Joined

  • Last visited

  • Days Won

    1

alank2 last won the day on January 18 2020

alank2 had the most liked content!

Community Reputation

5 Neutral

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. I need to put a VCL form in a DLL and call it from another application. I've made the DLL and can call it just fine, but it shows as maximized even though it isn't supposed to be. //create form Form1=new TForm1(NULL); //show form modally Form1->ShowModal(); //copy result strcpy(APhoneNumber, Form1->phonenumber); //delete form delete Form1; Windows state is set to normal, If I put this in the formshow of the form: Form1->WindowState=wsNormal; There is no difference - I think the WindowState is already set this way. If I could click the title bar of the form, it does go to the right size. If I close it and reopen it with the above code (which creates a new TForm1), it does NOT happen a second time. If I change the formshow to this: Form1->WindowState=wsMinimized; Form1->WindowState=wsNormal; It does show as normal size the first and subsequent times, but I can see the animation of it minimizing and restoring. Why does this happen? Could it be perceiving the way the application that is using it was loaded such as maximized and overriding the WindowState somehow? if so, can that be prevented in a better way that what I'm doing? Other thoughts? edit: Does this have to do with Application->FInitialMainFormState? Can I change it somehow? When I try it says it is protected.
  2. Thanks Remy; I'll work through this! I appreciate it.
  3. The sleep isn't really important as it was just added to keep it from consuming the CPU if ServiceThread->ProcessRequests(true); returns immediately. I am okay with ServiceThread->ProcessRequests(true); not returning until the service is stopped, the loop only needs to come into play during that situation where the "while (!Terminated || !TProcess->Enabled)" keeps it running until TProcess->Enabled becomes true (meaning that that method has successfully completed). The goal there is to not have the service stop without waiting for the TProcess method to complete. Maybe the 250ms should be dropped to 1ms in the Sleep as that could be keeping the ServiceThread->ProcessRequests(true); from executing more quickly to help it get stopped. So, my ServiceExecute does (1) init code, (2) ServiceThread->ProcessRequests until terminated and my tprocess timer method is complete, and finally (3) termination code. Is there a better way to do it? Should I move 1 into OnStart and 2 into OnStop? Can I eliminate ServiceExecute but still have it wait on the tprocess timer method to complete before executing OnStop and shutting down?
  4. I called this from a timer method and it did not work. ServiceThread->Terminate(); But this worked beautifully. ServiceController(SERVICE_CONTROL_STOP); Thanks for the info! I've got other init code in it and my loop also tests to see if the timer has finished executing before exiting the loop. I clear TProcess->Enabled when entering it and set it when it exits. log1.Log(L"Service started"); TProcess->Enabled=true; while (!Terminated || !TProcess->Enabled) //do not quit if process is running until it is finished { ServiceThread->ProcessRequests(true); Sleep(250); } TProcess->Enabled=false; log1.Log(L"Service STOPPED");
  5. alank2

    12.2 Crashing during debugging

    https://embt.atlassian.net/servicedesk/customer/portal/1/RSS-1987 They changed its status to Open. >I also get the same issue if I add a line: > String S = _D("μ \u00B5 α Ω °C © Å "); >and then save the file - this forces the file encoding to be UTF-8 with a BOM identifier. >Definitely a bug.  You might add this note to the case link above. >What is interesting is that the IDE works fine with target of Win64 (traditional) or Win64 (modern). I agree, tested this and it worked fine. >What is interesting and surprising is that the IDE hangs in the same bad way if you use the Win32 classic compiler. I tried newer and classic, both failed. Also codeguard on or off, both failed.
  6. I tried Application->Terminate(); or Svcmgr::Application->Terminate();, but they do not exist. There is this, but I have no idea what the CtrlCode is - is there one for "stop" ? void __stdcall ServiceController(unsigned CtrlCode) { Service1->Controller(CtrlCode); } What is the proper way for a service application to request shutdown? I have a ServiceExecute method being called that contains this: while (!Terminated) { ServiceThread->ProcessRequests(true); Sleep(250); } I can't change Terminated to true, it says it is inaccessible.
  7. alank2

    12.2 Crashing during debugging

    I opened up a bug request at the Embarcadero site (RSS-1987) for this.
  8. alank2

    12.2 Crashing during debugging

    This bug is easily reproduced. Launch RAD Studio 12.2 File -> New -> Windows VCL Application - C++ Builder Save All - give the project a new folder to work in and save the files Double Click Target Platform - Windows 32-bit to select it F12 on unit1.cpp to go to code. Insert the below bold lines in the form constructor __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { int i1; i1=5; } Save All Project -> Build All Press F4 on the i1=5; line Press F8 to step forward (this works as expected) Now change it to this by adding a declaration for headers: __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { int i1; char headers[4096]; i1=5; } Save All Project -> Build All Press F4 on the i1=5; line (it will stop here making you think it is working correctly, but it is hung. You can try to press F8, but it will not step forward and about 30-60 seconds later RAD Studio will crash and disappear form the desktop).
  9. alank2

    12.2 Crashing during debugging

    I appreciate the reply. I was not doing a make, but a build for the compile that generates the linker errors, so it shouldn't (I would think) use any existing data, but I'm not sure if it uses any precompiled headers or similar. I know it shouldn't have an error one way (just opening a problem) and not 3 seconds later after just opening a unit like Unit1.cpp. It should build either of those states exactly the same. As odd as that error is, the big one is the debugging one is the deal breaker for me being unable to use 12.2. I'll try to delete any intermediate files and see if that changes anything. I suppose I could build a new project file instead of upgrading my 10.3.3 one to see if that has any bearing on the issue as well. Thanks!
  10. I've been using 10.3.3 for a long time, but needed to upgrade to a newer version because TMultipartFormData does not properly work on it. I get a 400 BadRequest instead of a 200 OK. Something with this component must have been updated because it works in later versions. I couldn't get 12.2 to install on the machine I have 10.3.3 because for some reason it won't install the bds.exe and then gives an error trying to run it (embarcadero unable to execute file c:\program files (x86)\embarcadero\studio\23.0\bin\bds.exe). Not getting past that I decide to install it on a different machine (win11 instead of win10) that I am moving to (new notebook). Install goes fine there, but it has a weird debugging crash problem I can't figure out: I am building a program in debug mode. It has one unit in it. I can step into the program. I can go to cursor and step through FormShow for Unit1. I can go to cursor and step through two different functions that are called by TStartTimer. BUT, if I go to cursor inside of even a mostly empty TStartTimer, it will hang for 60 seconds and the compiler/application will close and leave me looking at the desktop. Even if I cut this function down to this: void __fastcall TFMainform::TStartTimer(TObject *Sender) { // wchar_t ws1[4096]; wchar_t ws1[1024], ws2[1024], wts1[1024], cmd[1024]; //disable timer TStart->Enabled=false; } It will currently WORK in the above scenario. I can go to cursor the TStart->Enabled=false; statement and then step over/run and all is fine. If I change the variables so that the ws1 is unremarked and the line with the 4 variables below it is remarked, it will CRASH despite both still being the same amount of overall variables put on the stack. I've tried the classic win32 compiler and the newer one, same result. I've tried enabling or disabling codeguard, same result. The code works if I don't try to stop inside this function. If I unremark everything that was in there to make the API call, I get a 200 OK back from it. It just seems to hang if I try to stop and step inside it. edit to add; 11.3 does not have the problem. it works fine there. also, while I'm piling on 12.2, if I open the project and do a build immediately, I get errors like this: If I then double click unit1.cpp to open it and repeat the build, these errors go away. Any ideas?
  11. Thanks for the ideas; I appreciate them. Will keep thinking through this.
  12. I am trying to think about how to set up a server API that would push data down to multiple sites, but I don't want those sites to have to require static IP/domain name/opened ports of any type. The general work flow I am thinking about would be that an API request is made from the Internet to the server and then the server would push that request to one of the multiple sites (again, no static ip, no DNS, no open ports). I don't want polling where the clients hit the API every so many seconds or minutes, but the real time speed of the data being pushed to them. I am just thinking about IP here, and in that context I am presuming that the multiple sites must start a service or program that reaches out to the server API to establish the connection, but keeps that connection open. Then the server, when it wants to push something to them, would already have that open connection to send it over. Would that be a workable plan? Is that the way something like this is being done by others? Are there better ways to do it? Are there service providers that handle some of the tough lifting on this? Is this something that the Windows Communication Foundation does? Is there something better?
  13. I am familiar with setting them as an array like this: nhc->CustomHeaders["Authorization"]="mydata"; But could all of them be set from a string formatted as http headers like this authorization:mydata another:value As a single string with a newline between them? If so, how? I see a Data, but it is a const void. (I am using cppbuilder)
  14. alank2

    C++ / windows.h and data alignment

    Also, just to add to this, the latest headers in VS2019 do warn of this problem - if the structure packing is changed to something other than 8 and you include <windows.h>, it will give this error. Severity Code Description Project File Line Suppression State Error C2338 Windows headers require the default packing option. Changing this can lead to memory corruption. This diagnostic can be disabled by building with WINDOWS_IGNORE_PACKING_MISMATCH defined. Which is easily fixed by wrapping the include like this: #include <pshpack8.h> #include <windows.h> #include <poppack.h>
×