델파이 XE2의 DataSnap 기능은 이전버전인 Midas와 DataSnap에 비하여 월등히 강력하고 사용하기 쉽게 변경 되었습니다. 또한 XE2에서 새로 지원하기 시작한 Mac OSX에 대한 지원도 매우 훌륭한 기능입니다. 이 셈플 프로그램에서는 OSX용 DataSnap 클라이언트를 만들어 봄으로 델파이 XE2의 DataSnap 기능과 OSX Client 에서 서버와 DataSnap을 이용한 데이터 통신 기능을 배워 보도록 하겠습니다.

  • 서버만들기

메뉴에서 [File] – [New] – [VCL forms Application – Delphi] 를 선택해서 새 애플리케이션을 만들고 각각 저장합니다. 생성된 Form1의 화면 위에 위의 그림과 같이 TDSServer, TDSServerClass, TDSTCPServerTransport 컴포넌트를 한 개씩 올려 놓는다.

TDSServerClass 의 프로퍼티 중 Server 항목을 DSServer1으로 선택합니다

TDSTCPServerTransport 의 프로퍼티 중 Server 항목을 DSServer1으로 선택합니다.

클라이언트에서 호출하기 위한 클래스를 생성하기 위해 새로운 유니트를 하나 만듭니다. [File] – [New] – [Unit – Delphi] 메뉴를 선택해서 새로운 유니트를 하나 만들고 아래와 같이 코딩하고 MyClass.pas 로 저장합니다.

DSServerClass1 의 이벤트 탭에서 OnGetClass 이벤트를 더블 클릭해서 메소드를 생성하고 아래와 같이 코딩하고 실행해서 서버를 대기 상태로 만들어 줍니다.

.

  • OSX용 DataSnap Client 만들기

OSX용 DataSnap Client를 만들기 위해 [File] – [New] – [FireMonkey HD Application – Delphi] 를 선택해서 새 프로젝트를 생성합니다. 생성된 새 화면위에 아래와 같이 화면을 디자인합니다.

TSQLConnection – 1개, TEdit – 3개, TButton – 1개를 화면에 배치하고 TSSQLConnection의 프로퍼티를 다음과 같이 지정합니다.

컴포넌트프로퍼티
SQLConnxctionDriverDataSnap
 Driver – HostnameLocalhost 혹은 아이피
 ConnectionNameDataSnapCONNECTION
 ConnectedTrue

Connected 프로퍼티를 True로 변경하여 연결을 실행 합니다. 만일 연결 오류가 발생한다면 서버의 상태를 확인하거나 아이피, 포트 등을 확인한 후 다시 연결을 시도 합니다.

정상적으로 연결 되었다면 TSSQLConnection을 선택한 후 오른쪽 버튼을 눌러서 아래의 그림과 같은 메뉴를 호출해서 [Generate Datasnap Client Classes]를 선택해서 클래스를 자동으로 생성합니다. 정상적으로 연결이 되어 있다면 Unit2.pas가 생성되고 Client Classes 들이 생성됩니다.

버튼 클릭 이벤트에 아래와 같이 코딩합니다.

코딩을 마치고 먼저 Win32 환경에서 실행 하면 아래와 같은 실행 결과를 얻을 수 있습니다.

Add Platform (델파이 XE2에서 맥애플리케이션 만들기 참조) 메뉴에서 OSX 를 추가하고 맥컴퓨터에 실행 시키면 아래의 그림과 같은 맥용 DataSnap Client 를 조회 할 수 있습니다.

본 셈플 프로그램은 간단한 계산식 연동만 테스트 했지만 데이터베이스 테이블 및 다양한 형태의 데이터를 주고 받을 수 있도록 변형이 가능합니다.

번호 제목 글쓴이 날짜 조회 수
공지 [DelphiCon 요약] 코드사이트 로깅 실전 활용 기법 (Real-world CodeSite Logging Techniques) 관리자 2021.01.19 14402
공지 [UX Summit 요약] 오른쪽 클릭은 옳다 (Right Click is Right) 관리자 2020.11.16 13042
공지 [10.4 시드니] What's NEW! 신기능 자세히 보기 관리자 2020.05.27 15547
공지 RAD스튜디오(델파이,C++빌더) - 고객 사례 목록 관리자 2018.10.23 21079
공지 [데브기어 컨설팅] 모바일 앱 & 업그레이드 마이그레이션 [1] 관리자 2017.02.06 22308
공지 [전체 목록] 이 달의 기술자료 & 기술레터 관리자 2017.02.06 17958
공지 RAD스튜디오(델파이, C++빌더) - 시작하기 [1] 관리자 2015.06.30 38243
공지 RAD스튜디오(델파이,C++빌더) - 모바일 앱 개발 사례 (2020년 11월 업데이트 됨) 험프리 2014.01.16 173759
563 [업데이트][핫픽스][10 시애틀] OS X 앨 캐피텐 지원과 iOS SDK 호환성 강화를 위한 PAServer 핫픽스 출시 험프리 2015.10.02 780
562 iOS 개발환경 설정이 잘 되지 않은 경우 체크사항 - iOS 버전 확인 필요 file Humphery 2015.10.01 825
561 안드로이드 개발환경 추가 조치방법 - RAD Studio에서 SDK 설정 Humphery 2015.10.01 5534
560 [추가자료] 안드로이드 개발환경 추가 조치방법 - 수동 SDK Tools 업데이트 file Humphery 2015.10.01 3037
559 iOS9의 새로운 기능인 "App transport Security" 예외 허용을 위한 Info.plist xml 수정방법 [1] Humphery 2015.10.01 840
558 [마이그레이션] 함수(또는 변수)에 빨간밑줄이 가고 컴파일 시 Undeclared Identifier 오류 시 조치방법 file 험프리 2015.09.30 2353
557 XE7과 XE8에서 iOS 9용 iOS 32비트 애플리케이션을 빌드하는 절차안내. Humphery 2015.09.25 471
556 이 달의 기술자료 - 2015년 10월 file 험프리 2015.09.25 521
555 [무료 온라인 세미나] 사물인터넷 실제 구현하기 DeepDive! 관리자 2015.09.15 389
554 바이너리 폼파일(*.dfm)을 텍스트 폼파일로 변경하는 도구 Humphery 2015.09.15 1476
553 [발표자료] 20150910 "RAD Studio 10 시애틀" 출시 기술 워크샵 관리자 2015.09.11 307
552 델파이 문서화 도구 참고링크 Humphery 2015.09.11 1150
551 [무료 온라인 세미나] 새로운 RAD Studio 10 시애틀: 윈도우 10 혜택을 누리세요! 관리자 2015.09.11 275
550 [시애틀] 안드로이드 서비스 앱을 만들 수 있습니다. Humphery 2015.09.07 690
549 [시애틀] 컨트롤 힌트, 윈도우 10 용 네이티브 랜더링 등 윈도우 10용 FMX! 험프리 2015.09.07 1215
548 [시애틀] 비콘펜스(BeaconFence)등 새로운 오픈 소스와 컴포넌트 패키지를 IDE에서 직접 확보할 수 있습니다. Humphery 2015.09.07 937
547 [시애틀] 윈도우32비트 프로젝트에서 C++11 표준을 적용할 수 있습니다. Humphery 2015.09.07 1111
546 [시애틀] 스타일북 컴포넌트에 여러개의 플랫폼 스타일을 담을 수 있습니다. Humphery 2015.09.04 561
545 [시애틀] 20개 이상의 IDE 생산성 기능들이 내장되어 생산성, 품질, 안정성이 향상됩니다. Humphery 2015.09.04 441
544 [시애틀] iOS 64bit와 유니버셜앱을 만들고 디바이스에서 디버깅할 수 있습니다. Humphery 2015.09.04 505