자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Firemonkey MultiView에서 MultiDetail3.InternalPlaceOffset.X 를 수정할 수가 없네요.

2016.07.17 08:34

어려워 조회 수:141

* 사용 개발툴 버전 : 시애틀

* 테스트 단말기 모델명 : ios5c...ios...

* 테스트 단말기 O/S 버전 :

 

procedure TMultiDetailItemAppearance.UpdateSizes(const FinalSize : TSizeF);
var
  LInternalWidth: Single;
  LImagePlaceOffset: Single;
  LImageTextPlaceOffset: Single;
begin
  BeginUpdate;
  try
    inherited;
    // Update the widths and positions of renderening objects within a TListViewItem
    if Image.ActualWidth = 0 then
    begin
      LImagePlaceOffset := 0;
      LImageTextPlaceOffset := 0;
    end
    else
    begin
      LImagePlaceOffset := cDefaultImagePlaceOffsetX;
      LImageTextPlaceOffset := cDefaultImageTextPlaceOffsetX;
    end;
    Image.InternalPlaceOffset.X := GlyphButton.ActualWidth + LImagePlaceOffset;

    if Image.ActualWidth > 0 then
      Text.InternalPlaceOffset.X := Image.ActualPlaceOffset.X + Image.ActualWidth + LImageTextPlaceOffset
    else
      Text.InternalPlaceOffset.X := 0 + GlyphButton.ActualWidth;

    MultiDetail1.InternalPlaceOffset.X := Text.InternalPlaceOffset.X;
    MultiDetail2.InternalPlaceOffset.X := Text.InternalPlaceOffset.X;
    MultiDetail3.InternalPlaceOffset.X := Text.InternalPlaceOffset.X;

 

    LInternalWidth := FinalSize.Width - Text.ActualPlaceOffset.X - Accessory.ActualWidth;

    if Accessory.ActualWidth > 0 then
      LInternalWidth := LInternalWidth - cTextMarginAccessory;

 

    Text.InternalWidth := Max(1, LInternalWidth);


    MultiDetail1.InternalWidth := Text.InternalWidth;
    MultiDetail2.InternalWidth := Text.InternalWidth;
    MultiDetail3.InternalWidth := Text.InternalWidth;

 

    If FinalSize.Width < 330 Then   //아이폰이 4인치라면
     begin
       MultiDetail3.InternalPlaceOffset.X := 220;   // MultiDetail3.PlaceOffset.X := 220 요렇게 하고 싶은데

       showmessage('4인치');  //  요건 실행이 되는데 수정은 안되네요 ^^)
     end;
  finally
    EndUpdate;
  end;
end;

 

부탁합니다...

이 게시물을
목록
목록
번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17304
공지 유용한 관련 사이트 관리자2 2014.03.20 56185
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99610
2899 프레임 동적생성후 해제 (메모리 해제가 안되는현상) [2] 가을이다 2014.06.06 3511
2898 Delphi XE5, XE6 에서의 한글 문제 (TFDConnection, TFDQuery) [2] shocks 2014.06.08 3620
2897 XE5 안드로이드 TTS 사용하기 [1] 가을이다 2014.06.08 3141
2896 FireMonkey Form을 Win32 Panel에 올릴 수 있는 방법이 있는지요. [2] 늦바람 2014.06.10 2098
2895 style 다운로드를 어디서해야하나요? [1] 정헌이 2014.06.11 1793
2894 [세미나] TWebBrowser Component 사용시 JavaScript 기능을 사용할 수 있나요? [4] Humphery 2014.06.12 2751
2893 [세미나] 안드로이드 서비스앱을 만들 수 있나요? [1] Humphery 2014.06.12 1923
2892 [세미나] 모바일에서 새로운 OS버전이 나오면 어떻게 하나요? [1] Humphery 2014.06.12 2051
2891 [세미나] 네이티브코드로 개발된 모바일 버전과 파일사이즈가 차이가 납니다. [1] Humphery 2014.06.12 2088
2890 [세미나] 앱테더링은 어느 거리까지 통신이 가능한가요? [1] Humphery 2014.06.12 2448
2889 [세미나] DirectX나 OpenGL자료가 필요합니다. [1] Humphery 2014.06.12 1560
2888 [세미나] 메시지 다이얼로그 표시된 상태에서 절전모드 이후 먹통이 됩니다. [1] Humphery 2014.06.12 2597
2887 [세미나] 스플래쉬 추가후 일부 구동시 문제가 발생합니다. [1] Humphery 2014.06.12 2053
2886 [세미나] 기존의 VCL스타일에서 화면갱신 문제가 있었습니다. XE6에서 개선되었나요? [1] Humphery 2014.06.12 1422
2885 [세미나] 6월 10일 웹세미나의 질문답변 Humphery 2014.06.12 1487
2884 Rectangle 컬러값 변경 문의 [2] 가을이다 2014.06.13 2653
2883 이미지 선택영역 표시하기.. [2] 가을이다 2014.06.14 2490
2882 XE5 스크롤박스 사용시 컴포넌트 드래그시 스크롤 미동작. [2] 가을이다 2014.06.14 2377
2881 XE5 FireMonkey 버튼 컴포넌트 만들기.. [1] file 가을이다 2014.06.16 2426
2880 BOGO 프로모션 툴 다운로드 받는 방법 안내(2015.6.1~2015.6.30 구매고객) 관리자 2014.06.16 7712
쓰기
태그