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

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

2016.07.17 08:34

어려워 조회 수:155

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

* 테스트 단말기 모델명 : 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 19713
공지 유용한 관련 사이트 관리자2 2014.03.20 58649
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 102192
2899 컴파일과 저장관련 문의드립니다~ [1] syc 2016.04.12 152
2898 refind 기능을 이용하여 pageControl 에 올라가 있는 버튼은 수정이 안되나요 ? [1] 개미 2020.11.26 152
2897 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 11 - Exercise 2 [1] 관리자 2016.05.10 153
2896 Connection Profile Manager Error 박정희 2016.11.22 153
2895 XE2 사용하다 10.2를 써보니 Table 콤포넌트가 없네요? [1] 날라리아 2018.11.23 153
2894 델파이 RIO 버젼 버튼 문자 변경 오류문의 [3] silkroad99 2018.11.28 153
2893 [10.3.3 브리핑] RAD서버의 부하 분산 등은 어떻게 되나요? 험프리 2019.12.05 153
2892 10.3 ImageViewer에서 crop 기능문의 [1] file 파란하늘 2019.07.01 154
2891 Complex 자료형 [1] songport 2017.02.01 154
2890 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 12 - Exercise 2 [1] 관리자 2016.05.10 154
2889 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 12 - Exercise 7 [1] 관리자 2016.05.10 154
2888 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 20 - Exercise 1 [1] file 관리자 2016.05.27 154
2887 Class TLabelEffect not found [3] 훈기 2017.10.31 154
2886 TCP Server + Webborker [1] 제트콜 2017.05.25 154
2885 Raize BizComps 관련 문의 사항 [1] 김정명 2018.03.13 154
2884 PointMobileBI07모델 샘플자료 에러입니다. [1] 김종찬 2018.07.30 154
2883 기술자료에 있는 REST API 에러 원인 좀 file 봉프 2019.03.04 154
2882 WebBrowser에서 메모리를 줄일수 있나요? kim 2015.12.11 154
2881 1217 질문 연장 Update Local File Cache 시 다음과 같은 메세지가 뜹니다. [2] kerry 2016.02.19 154
2880 질문있습니다~사이베이스 연동 관련 [1] 신이치 2016.03.08 154
쓰기
태그