[delphizip] Re: HELP URGENT NEEDED

  • From: Roger Aelbrecht <Roger.Aelbrecht@xxxxxxxxx>
  • To: delphizip@xxxxxxxxxxxxx
  • Date: Tue, 23 Feb 2016 09:26:01 +0100

Qasim Butt schreef:

Hi there Roger,
thanks for the response but there is no ZBMsg,h file I am using Zipbuilder
1,92
On 22 February 2016 at 19:52, Roger Aelbrecht <Roger.Aelbrecht@xxxxxxxxx>
wrote:

Qasim Butt schreef:
Hi there,
I have been trying everyday for countless hours trying to install the
Zipbuilder package, I am getting errors
int __fastcall TZBHandler::LoadDefaultStrings(TStrings* DefStrs)
{
    int Result;
    TMemoryStream* si = new TMemoryStream();
    try
    {  // load 'static' compressed default strings
DWORD CRC;
ReadCompressedStrings(si); // read array
si->Position = 0;
si->ReadBuffer(&CRC, static_cast<int>(sizeof(DWORD)));
TMemoryStream* so = new TMemoryStream();
try
{


[bcc32 Error] ZBHandler.cpp(170): E2268 Call to undefined function
'ReadCompressedStrings'
    Full parser context
      ZBHandler.cpp(164): parsing: int _fastcall
TZBHandler::LoadDefaultStrings(TStrings *)




AND







#ifndef UNICODE
if(IsUTF8) sl->Text = WideToUTF8(ws);
else
#endif
    sl->Text = ws;  // will convert
for(int i = 0; i < sl->Count; ++i)
{
   String s = sl->Strings[i];
   int psn;
   if((psn = s.Pos(",")) < 2) continue;
   String IdStr = Trim(s.SubString(1, psn - 1));
        if(IdStr.IsEmpty()) continue;
   int Id = -1;
   if(IdStr[1] == _T('Z')) Id = FindIndentifier(IdStr);
   if(Id < 0)
   {
if(!TryStrToInt(IdStr, Id)) continue; // not found or invalid
   }
   if(Id > MAX_ID) continue;
   String qs = Trim(s.SubString(psn + 1, s.Length()));
   s = qs;
   if(!qs.IsEmpty() && (qs[1] == _T('\"')))
   {
TCHAR* qsp = qs.c_str();
s = AnsiExtractQuotedStr(qsp, '\"');



[bcc32 Error] ZBHandler.cpp(237): E2268 Call to undefined function
'FindIndentifier'
    Full parser context
      ZBHandler.cpp(219): parsing: int _fastcall
TZBHandler::MergeStrs(TStrings *,const UnicodeString &)



any help will be immensely helpful asap


Kind Regards,
Qasim  Butt


-----------
To unsubscribe from this list, send an empty e-mail
message to:
    delphizip-request@xxxxxxxxxxxxx
and put the word unsubscribe in the subject.

ReadCompressedStrings is a function in ZBMsg.h and .cpp

void __fastcall ReadCompressedStrings(TMemoryStream* si)
{
    si->WriteBuffer(&CompBlock, sizeof(CompBlock));
}


--
Roger Aelbrecht

-----------
To unsubscribe from this list, send an empty e-mail
message to:
   delphizip-request@xxxxxxxxxxxxx
and put the word unsubscribe in the subject.


-----------
To unsubscribe from this list, send an empty e-mail
message to:
   delphizip-request@xxxxxxxxxxxxx
and put the word unsubscribe in the subject.

I see that the files are missing in the setup package, I will correct 
and upload a new version later today,
meanwhile you can download the  Zipbuilder 1920015.zip package and get 
the files from there.

-- 
Roger Aelbrecht

-----------
To unsubscribe from this list, send an empty e-mail 
message to:
  delphizip-request@xxxxxxxxxxxxx 
and put the word unsubscribe in the subject.

Other related posts: