자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Firemonkey [질문] 모바일 프로그램에서 상세조회를 할려고 터치하면 첫줄에 있는 키값으로된 자료만 조회됩니다
2015.08.13 17:25
본 게시판 사용시 당부 사항
* 이 게시판은 누구나 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------
모바일 프로그램에서 상세조회를 할려고 터치하면 첫줄에 있는 키값으로된 자료만 조회됩니다
무엇이 문제일까요?
댓글 4
-
-
delphi
2015.08.19 17:35
네 답변 감사드립니다
말씀하신대로 해도 되지 않아 제가 구성한것을 보여 드리겠습니다
보시고 수정사항 지적 부탁드립니다
Grid1에서 자료 조회 후 터치 하면 Grid2에서 상세내역이 조회 되는 것을 만들고자 하는것입니다
첨부파일 그림 보시고 연결이 틀린부분있으시면 알려주시면 감사하겠습니다
-
파이어 몽키에서 TStingGrid의 경우는 다음과 같이 코딩하시면 됩니다. edit1.Text := stringgrid1.Cells[0, stringgrid1.Selected];
하지만 TGird의 경우는 아래 링크의 예와 같이 클래스를 계승 받아서 사용하셔야 합니다.
참고적으로 모바일에서는 마스터/상세 조회시 TGid/TStringGrid 보다 TlistView,를 많이 사용합니다.
-
delphi
2015.08.20 10:58
네 답변감사드립니다.
말씀하신대로 해도 되지 않아 재 질문 드립니다
아래 소스가 제가 작성 한 것입니다
어떻게 고쳐야 터치 하는 라인의 값을 가져 올까요?
혹 말씀하신 LISTVIEW 로 공통/상세 조회 하는 SAMPLE 프로그램 있으시면 도움을 좀 받고 싶습니다
TabControl1.ActiveTab := TabItem3;
if not SQLCon.Connected then SQLCon.Connected := True;
if dtINOUTDtList.Active then dtINOUTDtList.Active := False;
svMethod := TServerMethods2Client.Create(SQLCon.DBXConnection);
try
Grid2.BeginUpdate;
Grid1.Cursor := crSQLWait; //조회중 로딩 표현
sAccDate := dtINOUTList.FieldByName('C001').AsString;
// sAccDate := FormatDateTime('YYYYMMDD',edt_TAccDate.Date);
sQmCD := dtINOUTList.FieldByName('C999').AsString;
sGubun := dtINOUTList.FieldByName('C004').AsString;
svDs := svMethod.GetINOUTDtList(sAccDate,sQmCD,sGubun);
Label1.Text := sAccDate + ' ' + sQmCD + ' ' + sGubun; <=== 이부분의 값이 터치 하는 라인의 값을 가져 와야 되는지
다른 라인을 터치 해도 첫번째 라인의 값만 나옵니다.
dtINOUTDtList.Data := svDs;
finally
svMethod.Free;
SQLCon.Connected := False;
Grid2.EndUpdate;
Grid1.Cursor := crDefault;
end;
Firemonkey [질문] 모바일 프로그램에서 상세조회를 할려고 터치하면 첫줄에 있는 키값으로된 자료만 조회됩니다
2015.08.13 17:25
본 게시판 사용시 당부 사항
* 이 게시판은 누구나 자유롭게 질문을 올리고 자발적으로 답변을 공유하는 게시판입니다.
* 따라서 질문을 올리실 때에는 최대한 자세하고 정중하게 질문을 올려 주세요.
* 최대한 질문을 자세히 올려야 답변도 자세히 올라 옵니다.
* 본 질문에 답변을 주시는 여러 개발자님들께 미리 감사드립니다.
-----------------------------------------------------------------------------------------------
모바일 프로그램에서 상세조회를 할려고 터치하면 첫줄에 있는 키값으로된 자료만 조회됩니다
무엇이 문제일까요?
댓글 4
-
delphi
2015.08.19 17:35
네 답변 감사드립니다
말씀하신대로 해도 되지 않아 제가 구성한것을 보여 드리겠습니다
보시고 수정사항 지적 부탁드립니다
Grid1에서 자료 조회 후 터치 하면 Grid2에서 상세내역이 조회 되는 것을 만들고자 하는것입니다
첨부파일 그림 보시고 연결이 틀린부분있으시면 알려주시면 감사하겠습니다
-
파이어 몽키에서 TStingGrid의 경우는 다음과 같이 코딩하시면 됩니다.edit1.Text := stringgrid1.Cells[0, stringgrid1.Selected];하지만 TGird의 경우는 아래 링크의 예와 같이 클래스를 계승 받아서 사용하셔야 합니다.참고적으로 모바일에서는 마스터/상세 조회시 TGid/TStringGrid 보다 TlistView,를 많이 사용합니다.
-
delphi
2015.08.20 10:58
네 답변감사드립니다.
말씀하신대로 해도 되지 않아 재 질문 드립니다
아래 소스가 제가 작성 한 것입니다
어떻게 고쳐야 터치 하는 라인의 값을 가져 올까요?
혹 말씀하신 LISTVIEW 로 공통/상세 조회 하는 SAMPLE 프로그램 있으시면 도움을 좀 받고 싶습니다
TabControl1.ActiveTab := TabItem3;
if not SQLCon.Connected then SQLCon.Connected := True;
if dtINOUTDtList.Active then dtINOUTDtList.Active := False;
svMethod := TServerMethods2Client.Create(SQLCon.DBXConnection);
try
Grid2.BeginUpdate;
Grid1.Cursor := crSQLWait; //조회중 로딩 표현
sAccDate := dtINOUTList.FieldByName('C001').AsString;
// sAccDate := FormatDateTime('YYYYMMDD',edt_TAccDate.Date);
sQmCD := dtINOUTList.FieldByName('C999').AsString;
sGubun := dtINOUTList.FieldByName('C004').AsString;
svDs := svMethod.GetINOUTDtList(sAccDate,sQmCD,sGubun);
Label1.Text := sAccDate + ' ' + sQmCD + ' ' + sGubun; <=== 이부분의 값이 터치 하는 라인의 값을 가져 와야 되는지다른 라인을 터치 해도 첫번째 라인의 값만 나옵니다.
dtINOUTDtList.Data := svDs;
finally
svMethod.Free;
SQLCon.Connected := False;
Grid2.EndUpdate;
Grid1.Cursor := crDefault;
end;
조회하려고 하는 데이터를 라이브바인딩을 사용하여 표시하셨다면 첨부 이미지와 같이 Synch로 연결하셔야 선택된 레코드가 반영됩니다. 라이브 바인딩을 사용 안 하셨다면 해당 레코드를 다시 검색하셔야 합니다.