Q&A

  • string grid row삭제
고수님들 안녕하세요





스트링그리드에 한줄삭제하는 방법좀 알려주세요



마지막꺼는 그냥처리하겠는데 중간에 삽입된 건 삭제를 못하겠어요



부탁드립니다.





2  COMMENTS
  • Profile
    깨구락지 2001.11.24 10:21
    type

    TDumGrid = class( TStringGrid ); //더미클래스 선언

    ...



    ps:=StringGrid1.Row;

    TDumGrid(StringGrid1).deleterow(StringGrid1.Row);

    //삭제후 마지막 위치로 포인트가 옮겨가는것을 방지하기 위하여

    StringGrid1.Row:=ps



    깨구락지



    누리 wrote:

    > 고수님들 안녕하세요

    >

    >

    > 스트링그리드에 한줄삭제하는 방법좀 알려주세요

    >

    > 마지막꺼는 그냥처리하겠는데 중간에 삽입된 건 삭제를 못하겠어요

    >

    > 부탁드립니다.

    >

    >

  • Profile
    최용일 2001.11.24 05:08
    안녕하세요. 최용일입니다.



    스트링그리드에서 특별히 행/열을 삭제하는 메소드는 없구요. 그냥 아래와 같이 for문을



    이용하세요...



    type

    TForm1 = class(TForm)

    ......

    procedure Button1Click(Sender: TObject);

    private

    procedure DeleteRow(Index: Integer);

    end;



    procedure TForm1.Button1Click(Sender: TObject);

    begin

    DeleteRow(2); // 3번째 열을 삭제한다

    end;



    procedure TForm1.DeleteRow(Index: Integer);

    var

    I: Integer;

    begin

    if Index < 0 then

    Exit;



    if Index = (StringGrid1.RowCount - 1) then

    StringGrid1.RowCount := Index

    else

    begin

    for I := Index to (StringGrid1.RowCount - 2) do

    StringGrid1.Rows[I].Assign(StringGrid1.Rows[I + 1]);

    StringGrid1.RowCount := StringGrid1.RowCount - 1;

    end;

    end;



    ^^ 항상 즐코하세요...



    누리 wrote:

    > 고수님들 안녕하세요

    >

    >

    > 스트링그리드에 한줄삭제하는 방법좀 알려주세요

    >

    > 마지막꺼는 그냥처리하겠는데 중간에 삽입된 건 삭제를 못하겠어요

    >

    > 부탁드립니다.

    >

    >