Jump to content

Borut

Members
  • Content Count

    11
  • Joined

  • Last visited

Posts posted by Borut


  1. Before trying your advice, I will uninstall the current Gr32 version (D110 runtime and design time package) by:

    -removing the package (Component menu-Install packages....)

    -deleting the GR32_RD110.bpl and GR32_DD110.bpl  in Bpl map ( .....\Documents\Embarcadero\Studio\22.0\Bpl)

     

    Is there anything else that I must check or delete to prepare a new clean install?

     


  2. I looked at the Environment variables and in System variables, and there is  a path to GR32_RD110.bpl .

    I thank you so much for your patience and expertise. I will try to ask this question in the general forum.

    I just wanted to ask you if it is worth trying (if possible at all) to install some of the previous gr32 packages (lets say RX) into RadStudio11.

    Years ago, (if I remember correctly), I read somewhere, that it is possible with changing GR 32 Compiler.inc?

    Thanks again.

    Borut

     


  3. I checked the library paths in c++ builder and they lead to a single graphics32 files (I added paths to following maps> Source, Packages, D110, DocProcessor and Maintenance.

    By using the command Trace Into ( I hope it corresponds to step into):

    a) if I used Trace Into after Run with debugging:

      it opened  ustring.cpp in main window

     

    ......

    ......

      void  __cdecl UnicodeString::ThrowIfOutOfRange(int idx) const
      {
    #if !defined(__clang__) || __cpp_exceptions
        if (idx < 1 || idx > Length())    // NOTE: UnicodeString is 1-based !!
          throw System::Sysutils::ERangeError(System_Sysconst_SRangeError);
    #else
        assert(idx < 1 || idx > Length());
    #endif
      }

      UnicodeString::UnicodeString(const char* src): Data(0)                STOPING in this line

    ........

     

     

    b) if I used Trace Into without Run with debugging:

    it opened CPU window in the Main window

     

     

    And yes: I get the same results if using the full path to .bmp.


  4. I hope I am doing this wright...

    If I put a breakpoint to the mentioned line and then inspect (Run...Inspect), I get:

    for the Image321 a whole group of data with the top one: FBitmap ::02469B50

    for the Image321->Bitmap a whole group of data with the top one: FOnHandleChange : NULL, NULL

     

    If I Evaluate Image321 I get : E2003 Undeclared identifier: 'Image321'

     

    Uf, I tried to inspect again and just got:

    Error inspecting Image321, E2003 Undeclared identifier: 'Image321'

     


  5. Here is the copy of the call stack. I will try to inspect the values...

     

    :00404439 TForm1::Button1Click(this=:024221E0, Sender=:023ED2C0)
    :50cc8229 vcl280.@Vcl@Controls@TControl@Click$qqrv + 0x79
    :50cccdc2 ; C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\vcl280.bpl
    :50cf006d vcl280.@Vcl@Stdctrls@TButtonControl@WndProc$qqrr24Winapi@Messages@TMessage + 0x71
    :50cccf1c ; C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\vcl280.bpl
    :50cccdc2 ; C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\vcl280.bpl
    :50e035a9 ; C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\vcl280.bpl
    :50ccc33b vcl280.@Vcl@Controls@TWinControl@MainWndProc$qqrr24Winapi@Messages@TMessage + 0x2f
    :50174202 rtl280.@System@Classes@TDataModule@WriteHeight$qqrp22System@Classes@TWriter + 0x22
    :777e339b user32.AddClipboardFormatListener + 0x4b
    :777da33a ; C:\Windows\SysWOW64\user32.dll
    :777d9709 ; C:\Windows\SysWOW64\user32.dll
    :777d7d4f user32.SendMessageW + 0x6f
    :71536608 ; C:\Windows\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.19041.1110_none_a8625c1886757984\COMCTL32.dll
    :71575f33 ; C:\Windows\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.19041.1110_none_a8625c1886757984\COMCTL32.dll
    :777e339b user32.AddClipboardFormatListener + 0x4b
    :777da33a ; C:\Windows\SysWOW64\user32.dll
    :777d9a07 ; C:\Windows\SysWOW64\user32.dll
    :777d7bab user32.CallWindowProcW + 0x1b
    :50ccceca vcl280.@Vcl@Controls@TWinControl@DefaultHandler$qqrpv + 0xe6
    :50cccdc2 ; C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\vcl280.bpl
    :50cf006d vcl280.@Vcl@Stdctrls@TButtonControl@WndProc$qqrr24Winapi@Messages@TMessage + 0x71
    :50174202 rtl280.@System@Classes@TDataModule@WriteHeight$qqrp22System@Classes@TWriter + 0x22
    :777e339b user32.AddClipboardFormatListener + 0x4b
    :777da33a ; C:\Windows\SysWOW64\user32.dll
    :777d809a ; C:\Windows\SysWOW64\user32.dll
    :777d7e60 user32.DispatchMessageW + 0x10


  6. Thanks for the reply.

    I don't have problems at design time.  If I load bitmap into Image321 from Object Inspector, the image is normally shown in Image321 before and also after compiling.

    It is only after compiling when I try to load bmp with button click:    Image321->Bitmap->LoadFromFile("Miki.bmp"), that error occurs.

    The message I get in Events if run project with debugging is following:

    Project Project1.exe raised exception class $C0000005 with message 'access violation at 0xeefeeefe: read of address 0xeefeeefe'. The blue arrow in the window is pointing to the line : Image321->Bitmap->LoadFromFile("Miki.bmp")

    Borut


  7. Hello,

    I try to use graphics32 package for Delphi11. I compiled GR 32 RD110 and GR 32 DD110 and installed GR 32 DD110. I can find components in Palette.

    But when I drop TImage32 on Form1 and after compiling try to open file with a button click ( I am using C++ builder) :

     

    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    Image321->Bitmap->LoadFromFile("Miki.bmp");
    }

    I first get:

    Access violation in module rtl280.bpl  ( If I uncheck link with dynamic RTL, this message disappears)

     

    but then:

    I get access violation at some address, which prevents loading the bitmap.

     

    If I try the same in Delphi11:

     

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    Image321.Bitmap.LoadFromFile('Miki.bmp')
    end;

    end.

     

    it normally opens the bitmap.

     

    Can you give me any advice to overcome the trouble?

    Borut


  8. On 11/6/2021 at 9:05 PM, Anders Melander said:

    I've just committed updated packages for Delphi 11 and added Delphi 11 to GR32_Compiler.inc (and cleaned it up a bit).

    Hello Anders,

    I try to use graphics32 package for Delphi11. I compiled GR 32 RD110 and GR 32 DD110 and installed GR 32 DD110. I can find components in Palette.

    But when I drop TImage32 on Form1 and after compiling try to open file with a button click ( I am using C++ builder) :

     

    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    Image321->Bitmap->LoadFromFile("Miki.bmp");
    }

    I first get:

    Access violation in module rtl280.bpl  ( If I uncheck link with dynamic RTL, this message dissapears)

     

    but then:

    I get access violation at some address, which prevents loading the bitmap.

     

    Can you give me an advice to overcome the trouble?

    Borut

     

    If I try the same in Delphi11:

     

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    Image321.Bitmap.LoadFromFile('Miki.bmp')
    end;

    end.

    ž

    it normally opens the bitmap

     

     

     


  9. On 11/6/2021 at 9:05 PM, Anders Melander said:

    I've just committed updated packages for Delphi 11 and added Delphi 11 to GR32_Compiler.inc (and cleaned it up a bit).

    Hello Anders,

    I try to use graphics32 package for Delphi11. I compiled GR 32 RD110 and GR 32 DD110 and installed GR 32 DD110. I can find components in Palette.

    But when I drop TImage32 on Form1 and after compiling try to open file with a button click ( I am using C++ builder) :

     

    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    Image321->Bitmap->LoadFromFile("Miki.bmp");
    }

    I first get:

    Access violation in module rtl280.bpl  ( If I uncheck link with dynamic RTL, this message dissapears)

     

    but then:

    I get access violation at some address, which prevents loading the bitmap.

     

    Can you give me an advice to overcome the trouble?

    Borut

×