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

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

2016.07.17 08:34

어려워 조회 수:154

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

* 테스트 단말기 모델명 : 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 19384
공지 유용한 관련 사이트 관리자2 2014.03.20 58283
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 101801
2859 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 21 - Exercise 1 [1] 관리자 2016.05.27 154
» MultiView에서 MultiDetail3.InternalPlaceOffset.X 를 수정할 수가 없네요. 어려워 2016.07.17 154
2857 FMX List View의 Toggle DesignMode 자동크기 조절에 대해 질문드립니다. [1] file syc 2017.04.18 154
2856 SMTP 관련 문의 [1] 빌더유저 2019.02.15 154
2855 IOS 앱실행관련 문의사항입니다. ( 디바이스 연결 관련 2번째) [2] 궁금한사람 2019.09.10 154
2854 string 타입 질문입니다. [2] 희망나라 2017.03.20 154
2853 Delphi 10의 새로운 기능 문의드립니다. [2] 라운지 2015.09.16 154
2852 TFDMemTable ios 에서 한글문제 있나요? [3] kerry 2015.10.28 154
2851 db 운영 시 데이터 추가 안되는현상 file 전수정 2017.05.29 155
2850 레포트 생성시 질문입니다. 희망나라 2019.08.13 155
2849 [질문] 자판을 입력할 수 없네요 [3] 화현 2020.02.20 155
2848 [개발생산성향상 세미나] 빌더 2010이후 툴의 향상된 기능에 대한 알고 싶습니다. 험프리 2017.02.22 155
2847 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 10 - Exercise 3 [1] 관리자 2016.05.10 156
2846 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 11 - Exercise 7 [1] 관리자 2016.05.10 156
2845 1개의 실행파일에 유닛(폼)을 몇개까지 담을수 있나요 ? 노력하는삶 2020.05.07 156
2844 custom Styles 질문!! [1] 초급개발자 2019.02.12 156
2843 델파이 5.0 스페인어 Richtext box 깨어지는 문제해결 방법? [1] file 여호수아 2018.06.19 157
2842 델파이 XE 디버깅시 매번 재컴파일 하나요? [1] 가나다 2019.03.14 157
2841 델파이로 시스템 초기화 버전 만들려고하는데 C드라이브 초기화 우루사 2020.06.14 157
2840 ListBox 사용중 문의 드립니다. [2] file 오광 2015.09.09 158
쓰기
태그