Q&A

  • listbox에서서 아이템 하나만 삭제하는법좀...?
listbox1.Items.Clear;

이러면 전부다 지워지는데 하나만 삭제할러먼 어케해야 하나요..

또 딜리트로 하면 아래같은 에러가 나오는데

[Error] servermain.pas(120): Not enough actual parameters

[Fatal Error] serverprogram.dpr(7): Could not compile used unit 'servermain.pas'



어떻게 하면 하나이 아이템만을 삭제할수있는지좀 가르쳐 주십시요...

제발 ...

제가 질문을 이상하게하는건지... 아님 얼토당토안은질문이라서 답번을 안하는건지...

저는 정말 모라서 물어보는건데/...

꼭 좀 부탁 드립니다...



3  COMMENTS
  • Profile
    방기남 2001.04.21 12:07


    ListBox1.Items.Delete[Index];



    하시면 됩니다.



    Index 에 원하는 인덱스를 넣어주면 되는데,



    다음과 같이하면 마우스가 선택한 것을 삭제할 수 있습니다.



    for i := 0 to ListBox1.Items.Count -1 do

    if ListBox1.Items.Selected[i] = True then

    ListBox1.Items.Delete[i];



    ^^



    도움이 되셨길...



  • Profile
    dora 2001.04.21 19:51
    앞으로 열심희 해서 저도 답변 많이 올릴수 있도록 노력하겠습니다...

    정말 로 갑사합니다.



    근데 왜 잘 안되지여...

    procedure Tserver.ServerSClientDisconnect(Sender: TObject;

    Socket: TCustomWinSocket);

    var

    i : integer;

    ip : string;

    begin

    ip := Socket.RemoteAddress;

    for i:=0 to listbox1.Items.count-1 do

    if listbox1.Items[i] = ip then

    listbox1.Items.[i];

    end;





    이런오류가....

    [Error] servermain.pas(120): Not enough actual parameters











    방기남 wrote:

    >

    > ListBox1.Items.Delete[Index];

    >

    > 하시면 됩니다.

    >

    > Index 에 원하는 인덱스를 넣어주면 되는데,

    >

    > 다음과 같이하면 마우스가 선택한 것을 삭제할 수 있습니다.

    >

    > for i := 0 to ListBox1.Items.Count -1 do

    > if ListBox1.Items.Selected[i] = True then

    > ListBox1.Items.Delete[i];

    >

    > ^^

    >

    > 도움이 되셨길...

    >

  • Profile
    하기 2001.04.22 00:21
    if listbox1.Items[i] = ip then

    listbox1.Items.[i]; ==> 이부분이 잘못된것 같은데요....





    dora wrote:

    > 앞으로 열심희 해서 저도 답변 많이 올릴수 있도록 노력하겠습니다...

    > 정말 로 갑사합니다.

    >

    > 근데 왜 잘 안되지여...

    > procedure Tserver.ServerSClientDisconnect(Sender: TObject;

    > Socket: TCustomWinSocket);

    > var

    > i : integer;

    > ip : string;

    > begin

    > ip := Socket.RemoteAddress;

    > for i:=0 to listbox1.Items.count-1 do

    > if listbox1.Items[i] = ip then

    > listbox1.Items.[i];

    > end;

    >

    >

    > 이런오류가....

    > [Error] servermain.pas(120): Not enough actual parameters

    >

    >

    >

    >

    >

    > 방기남 wrote:

    > >

    > > ListBox1.Items.Delete[Index];

    > >

    > > 하시면 됩니다.

    > >

    > > Index 에 원하는 인덱스를 넣어주면 되는데,

    > >

    > > 다음과 같이하면 마우스가 선택한 것을 삭제할 수 있습니다.

    > >

    > > for i := 0 to ListBox1.Items.Count -1 do

    > > if ListBox1.Items.Selected[i] = True then

    > > ListBox1.Items.Delete[i];

    > >

    > > ^^

    > >

    > > 도움이 되셨길...

    > >