베도빈

win64 link 할때 _lseek 에러 발생

https://community.idera.com/developer-tools/programming-languages/f/c-rtl/37828/unresolved-external-_lseek

여기 들어가보면

#if defined(_WIN64)
    extern "C" long  lseek(int, long, int);
    extern "C" long _lseek(int fd, long offset, int origin) {
      return lseek(fd, offset, origin);
    }
#endif

hotfix 추가했다는데, 최신본 구독안하는 독자들은 그냥 버리는구만.

뻔한 버그 수정도 안해주는 회사!!!

NextLAIS 프로젝트 사용중.

UnitCommMulti.cpp

UnitCommMulti.dfm

 이것 사용중인데 컴파일/링크 에러 없음.

메인 Form에 CPort 1개 추가

링크에러 발생 : Unable to open file "Cport.obj"

<<해결>>

메인에 있는 #pragma link "CPort" 를 삭제

// #pragma link "CPort"

---> 링크에러 사라짐

<<이상한점>>

UnitCommMulti.cpp

이 안에

#pragma link "CPort"

이게 있는데도 에러 없다

이건 이상한게 아니라 웃기는 거...

[ilink32 Warning] Warning: D:/NextigeApp/OpenCVTest32/UsingOpenCV32.ilc: 0x00010000 / 0x08000000

[ilink32 Warning] Warning: D:/NextigeApp/OpenCVTest32/UsingOpenCV32.ild: 0x00010000 / 0x08000000

[ilink32 Warning] Warning: D:/NextigeApp/OpenCVTest32/UsingOpenCV32.ilf: 0x00010000 / 0x0a000000

[ilink32 Warning] Warning: D:/NextigeApp/OpenCVTest32/UsingOpenCV32.ils: 0x0003b000 / 0x08000000

[ilink32 Warning] Warning: unknown heap name   : 0x08000000 / 0x08000000

[ilink32 Warning] Warning: Error detected (LME288)

[ilink32 Error] Error: Unable to perform link

--------------------

며칠전 발생 : PC 리부팅 후 그냥 제대로 동작.

2017-02-20 오늘 다시 발생. BC 재시작해도 마찬가지.

리부팅 나중에 해보고나서 다시 기록할 거임.

--------------------

http://stackoverflow.com/questions/28929516/c-builder-xe7-lme288-error

(1) ilink32.exe /LargeAddressAware

   1) Patch

      lamarker -M -Filink32.exe

editbin /LARGEADDRESSAWARE bcc32.exe

editbin /LARGEADDRESSAWARE ilink32.exe

  (2) bcdedit

1. Run command prompt as Administrator.
2. Type (without quotes) "bcdedit /set IncreaseUserVa 3072"
3. Reboot computer.

  (3) bcdedit

  (4) Acronis true image : 작업관리자 창에서 삭제

  (5) Admin계정으로 BC 시작

  (6) ...

  (7) PATH 변수가 2047 넘어서?

상황 :

C++ Builder 프로젝트에 UnitGr32Pas.pas 라는 소스 추가

UnitGr32Pas.hpp 가 없다고 E2209 컴파일 에러

원래 UseOpenCV30 프로젝트가 있는데,

UseOpenCV31 로 SaveAs...로 프로젝트 이름 바꾸기 한 것

UnitGr32Pas.pas를 프로젝트에서 지웠다가 다시 추가해도 마찬가지 현상.

왜 .hpp 파일을 만들지 않지?

해결 :

2015-10-16 현재 아직...

2016-02-15 현재 아직...

UsingOpenCV30 컴파일 시키면 나오는 에러 "

[ilink32 Error] Fatal: Unable to open file 'UNITGR32PAS.OBJ'

NextColor64 컴에서는 안나오느데, HP에서는 나온다.

- Project -> Option -> Library Path 추가해도 안된다.

2015-08-19일 현재 

아직 원인 불명.

원인 찾게되면, 잊어버리지 않게끔 여기에 기록해 둘 예정.

2017-01-16

원인 찾았다.

GLBaseClasses.obj 계속 찾는데,

path 추가로 해결될 문제가 아니었네.

Delphi 컴포넌트를 C++에서는 Lib 파일로 가져다 사용

프로젝트 파일 cbproj 직접 수정해야.

<AllPackageLibs>

<LinkPackageStatics>

GLScene_RunTime.lib 추가하니까 깔끔하게 해결.

예전 프로젝트 파일 불러와서 새로 컴파일하면 생기는 에러.

(1) WinMain 을 _tWinMain 으로 바꾼다.

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)

를

WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)

이걸로 바꾼다.

(2) tchar.h 추가

#include <vcl.h>

#pragma hdrstop

#include <tchar.h>

이렇게 한 줄 추가해주면 끝.

Ref : http://support.smartbear.com/viewarticle/54602/

This topic explains how to prepare 64-bit applications created with Embarcadero C++Builder XE3 - XE5 for AQtime.

To learn how to prepare 32-bit applications created with C++Builder, see Compiler Settings for Embarcadero C++Builder XE3 - XE5 (32-bit). To learn how to prepare applications created with other C++Builder versions, see Compiler Settings for Native Applications.

To prepare a 64-bit Embarcadero C++Builder application for AQtime, first of all, you need to make sure that it includes debug information. Follow these steps:

1. Open your project in C++Builder XE3, XE4 or XE5.

2. Choose Project | Options from the main menu to open the Project Options dialog.

3. In the tree on the left of the dialog, select the C++ Compiler | Debugging category. To include symbolic debug information, set the Debug information option to True.

   
   Click the image to enlarge it.

4. To set the Delphi compiler options, select the Delphi Compiler | Compiling category from the tree view on the left of the dialog:

   • To include symbolic debug information, set the Debug information option to True. In addition, to refer this information to source line numbers, set the Local symbols option to True.

     
     Click the image to enlarge it.

   • (Optional) To generate stack frames when using the Delphi compiler, set the Stack frames option to True.

     
     Click the image to enlarge it.

5. Switch to the C++ Linker category and set the Full debug information option to True.

   
   Click the image to enlarge it.

6. To generate a map file that contains information on the application’s global symbols, source files and source line numbers, switch to the C++ Linker | Output category and set theMap file type option to Map file with segments, Map file with publics or Detailed segment map.

   
   Click the image to enlarge it.

7. Switch to the C++ (Shared Options) category and check the Library path option. Make sure that the path contains the $(BDS)\lib\$(PLATFORM)\debug folder:

   
   Click the image to enlarge it.

8. Once you have set the compiler and linker options correctly, rebuild your application and it will be ready for profiling. If you are profiling an ActiveX control or a COM server, you need to register its “debug” version in the system (See Profiling COM Applications).

When your application is ready for release, remember to recompile it without debug information to reduce the application size.

[dcc32 Warning] SjAppGetVersion.pas(13): W1010 Method 'Create' hides virtual method of base type 'TComponent'

  TComponent = class(TPersistent, IInterface, IInterfaceComponentReference)

  public

    constructor Create(AOwner: TComponent); virtual;

  TSjAppVersion = class(TComponent)

  public

    constructor Create( AOwner : TComponent );

There are three alternatives to take when solving this warning. 

(1) constructor Create( AOwner : TComponent ); override;

You could specify override to make the derived class' procedure also virtual, 

if the ancestor's respective method is declared as virtual or dynamic, and thus allowing inherited calls to still reference the original procedure. 

(2) constructor Create2( AOwner : TComponent );

You could change the name of the procedure as it is declared in the derived class.

  Both of these methods are exhibited in the source code snippets above. 

(3) constructor Create( AOwner : TComponent ); reintroduce;

  You could add the reintroduce directive to the procedure declaration 

to cause the warning to be silenced for that particular method.

The reintroduce keyword instructs the Delphi compiler to hide the respective method 

and suppress the warning, 

because it is unlikely to override a method of the same name from a base class that is not virtual or dynamic. 

Embarcadero 2009 또는 XE 부터 Unicode 가 도입되면서

기존의  component 들 모두 Unicode 문제에 봉착.

Indy 에서 send / receive 할 때, 한글이 포함되면 ?

당연히 깨진다.

해결방법은 ?

보낼 때 : 

UnnicodeString strSend;

IdUDPClient1->Send(strSend, IndyTextEncoding_UTF8());

받을 때 :

void __fastcall TfrmUDP::IdUDPServer1UDPRead(TIdUDPListenerThread *AThread, TBytes AData, TIdSocketHandle *ABinding)

이 함수에다,

Unicodestring BData = BytesToString(AData, IndyTextEncoding_UTF8());

이렇게 처리해주면 된다.

참조 : 

http://www.borlandtalk.com/extractstrings-question-vt90577.html

TStrings 사용하려면 -> #include <Classes.hpp>

int __fastcall SeparateStrings(const AnsiString &AString, char ADelimiter, TStrings *AStrings)

{ 

  int Result = 0; 

  if( (AString.Length() > 0) && (AStrings) ) { 

    AStrings->BeginUpdate(); 

    try 

    { 

      char *ptr = const_cast<AnsiString&>(AString).c_str(); 

      char *end = (ptr + AString.Length()); 

      while( (*ptr <= ' ') && (ptr < end) ) 

      ++ptr; 

      char *start = ptr; 

      bool InQuote = false; 

      while( ptr < end ) 

      { 

        if( (*ptr == ADelimiter) && (!InQuote) ) 

        { 

          AStrings->Add(AnsiString(start, ptr-start)); 

          ++Result; 

          start = ++ptr; 

        } 

        else if( *ptr == '"' ) 

        { 

          InQuote = !InQuote; 

          ++ptr; 

        } 

        else 

          ++ptr; 

      } 

      if( start < end ) 

      { 

        AStrings->Add(AnsiString(start, end-start)); 

        ++Result; 

      } 

    } 

    __finally { 

      AStrings->EndUpdate(); 

    } 

  } 

  return Result; 

}