Q&A

  • 리스트뷰에서 더블클릭했을때. 서브아이템의 텍스트 얻어오는거..
우선 소스를 보여드리죠..

procedure TForm1.ListView1DblClick(Sender: TObject);

begin

if ListView1.Selected <> nil then

MessageDlg(ListView1.Selected.SubItems.Text,mtInformation,[mbOK],0);

end;

-->이결과가 예를 들어 'MESSAGE'라고 나왓다고 칩시다.



그런데 아래가 문제죠...보시죠...

procedure TForm1.ListView1DblClick(Sender : TObject);

begin

if ListView1.Selected <> nil then

if ListView1.Seletected.SubItems.Text = 'MESSAGE' then

MessageDlg('성공',mtInformation,[mbOK],0);

end;

-->이렇게 했을
1  COMMENTS
  • Profile
    김영대 1999.07.30 00:19
    이용일 께서 말씀하시기를...

    > 우선 소스를 보여드리죠..

    > procedure TForm1.ListView1DblClick(Sender: TObject);

    > begin

    > if ListView1.Selected <> nil then

    > MessageDlg(ListView1.Selected.SubItems.Text,mtInformation,[mbOK],0);

    > end;

    > -->이결과가 예를 들어 'MESSAGE'라고 나왓다고 칩시다.

    >

    > 그런데 아래가 문제죠...보시죠...

    > procedure TForm1.ListView1DblClick(Sender : TObject);

    > begin

    > if ListView1.Selected <> nil then

    > if ListView1.Seletected.SubItems.Text = 'MESSAGE' then

    > MessageDlg('성공',mtInformation,[mbOK],0);

    > end;

    > -->이렇게 했을