C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[58737] 델파이 -> c++ 변환 중입니다. 검토 부탁드립니다.
용찬 [] 897 읽음    2009-10-09 17:48
<delphi>
================================================================================
procedure TForm1.btn_DLLManagerLoadClick(Sender: TObject);
var
  sFile : string;
begin
  frmResult.Memo1.Lines.Add('########## DLL Manager Start ##########');
  sFile := ExtractFilePath(Application.ExeName)+'Dll\' + 'DLLManager.dll';
//  sFile := ExtractFilePath(Application.ExeName)+'Dll\' + 'pKmpComm.dll';
  if FileExists(sFile) then
  begin
    hDLLManager := LoadLibrary( pChar(sFile) );
    if ( hDLLManager < 32 ) then
    begin
      frmResult.Memo1.Lines.Add(' 통신 Dll Manager 로딩 실패!! ');
      frmResult.Memo1.Lines.Add(' 프로그램을 다시 인스톨하십시오.' );
    end
    else
    begin
      frmResult.Memo1.Lines.Add(' 통신 Dll Manager 로딩 성공!! ');
      frmResult.Memo1.Lines.Add('');
      frmResult.Memo1.Lines.Add('');


    end;
  end
  else
  begin
    frmResult.Memo1.Lines.Add(' DLL이 없습니다 ');
    frmResult.Memo1.Lines.Add(' 프로그램을 다시 인스톨하십시오.' );
  end;

end;
================================================================================



<c++>
================================================================================
void __fastcall TForm1::btn_DLLManagerLoadClick(TObject *Sender)
{
    String *sFile;
   
    frmResult->Memo1->Lines.Add('########## DLL Manager Start ##########');
   
    if (FileExists(sFile))
    {
        hDLLManager = LoadLibrary( pChar(sFile) );
       
        if ( hDLLManager < 32 )
        {
            frmResult->Memo1->Lines->Add(' 통신 Dll Manager 로딩 실패!! ');
            frmResult->Memo1->Lines->Add(' 프로그램을 다시 인스톨하십시오.' );       
        }   
        else
        {
            frmResult->Memo1->Lines->Add(' 통신 Dll Manager 로딩 성공!! ');   
            frmResult->Memo1->Lines->Add('');
            frmResult->Memo1->Lines->Add('');       
        }
    }
    else
    {
    frmResult->Memo1->Lines->Add(' DLL이 없습니다 ');
    frmResult->Memo1->Lines->Add(' 프로그램을 다시 인스톨하십시오.' );
    }
}
================================================================================

델파이  소스를 c++ 로 바꾸고 있습니다.
제가 c++을  잘 몰라서요..
위의 소스가 맞는지 좀 봐 주실수 있으신가요?

그럼 부탁드립니다.

+ -

관련 글 리스트
58737 델파이 -> c++ 변환 중입니다. 검토 부탁드립니다. 용찬 897 2009/10/09
58738     Re:델파이 -> c++ 변환 중입니다. 검토 부탁드립니다. 이길남.HoPe 935 2009/10/09
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.